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I. INTRODUCTION 



A. INTRODUCTION TO THE PROBLEM 

In every battle ship the personnel should be organized 
such that the ship could provide a variety of functions 
and operate under different situations, in different 
environments . 

This personnel organization follows standards that each 
country consecrates and is based on the missions that each 
individual ship should be able to perform. This directly 
determines the number of men that serve on this ship, and 
the rank, the specialization and the skills of each member 
of the crew. 

Although there are organization tables, general rules 
for assignment, and records of the char ac ter i st ic s (rank, 
specialization, education, special skills, experience, etc.) 
of each member of the crew, the assignment of the duties to 
each member of the crew is sometimes a very difficult and 
time consuming job. The task is even more complex due to 
the requirement to cross assign personnel to additional or 
collateral duties, which are required under certain 
conditions. In this case the appropriate personnel have to 
be selected in a real time environment but under the 
restriction that those absent from traditional jobs will not 
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be a detriment to the operation of the department in which 
they belong. 

Personnel changes are an annual occurrence, and during 
these annual reassignments, it is quite often the case that 
the new' member of the crew cannot be substituted directly 
for the departing personnel in all additional duties. New 
members may have served in similar additional duties. 

If there is not enough time for the new member to be 
trained, these additional duties have to be reassigned among 
the other members of the crew until the training of the new 
members can be completed. 

Both the initial construction and the reconstruction of 
these assignment tables are based on the existing records of 
the personnel. The assignment process is a constant 
reexamination of these records. Existing lists and tables 
must be compared with the new assembled information. The 
reevaluation of the current assignment lists can take a 
considerable amount of time. 

The problem is critical both in large and small ships. 

In the first case, there are a large number of personnel 
assigned and an enormous amount of records must be examined. 
In the second case, that is in the case of small ships, the 
limited number of people that serve on the ship makes the 
assignment of the additional duties much more difficult 
simply because of a large number of jobs, and limited people 
to fill them. 
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Finally, in the Hellenic Navy only officers and the non- 
commissioned officers serve on a permanent basis, while the 
lower level personnel (seamen) serve for a standard (usually 
short) period of time. Therefore, from time to time 
projection tables reflecting future needs in lower level 
personnel must be assembled and sent to Navy training 
centers for new personnel availability planning in replacing 
those finishing their service obligations. 

The purpose of this application is to substitute the 
traditional, manual way in which personnel records are used 
in a small battle ship for supporting personnel management , 
by the use of a microcomputer database system that can not 
only provide the appropriate information for personnel 
management decisions, but also provide some solutions to the 
assignment problem in real time. 

Of course, personnel management must not be based solely 
on automated methods, or computer generated solutions. In 
this instance the human factor plays a very important role 
in this kind of data interpretation. 

However, it is much better to have a quick basis from 
which to start the decision process than to start from the 
beginning with the full review process. 

A small ship has been selected as a model; it can easily 
be extended to the personnel assignment problem in a larger 
one. The construction of the sample database for represen- 
tation purposes is much easier, and no significant details 
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are likely to be omitted since the nature of the problem is 
the same in both large and small ships. 

A model of personnel organization according to Hellenic 
Navy standards will be used, but some details will be 
omitted, however, due to the unclassified nature of the 
research project. Also some organization modifications have 
been used in order to generalize the standards used by most 
other countries. 

B. INTRODUCTION TO DATABASE CONCEPTS 

During the last fifteen years the use of database 
systems is dramatically increasing year by year. This is 
because a database system compared with a conventional 
digital computer has a number of advantages. 

Database processing enables more information to be 
produced from a given amount of data. When data is 
physically partitioned, as it is in file processing systems 
(Figure 1), information can only be derived from each part 
individually, and not derived from a combination of these 
parts. The use of a database eliminates this disadvantage 
allowing the production of information as a combination of 
different storage parts (Figure 2). 

The use of database processing has also the advantage of 
avoiding data duplication, or at least reduction of data 
duplication. This results in the savings of storage space 
and reduced processing requirements. 
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In a file processing system each program used must 
contain a description of the format of the files it uses. 
Thus, the structure of files will be distributed across 
application programs. When the structure of a file is 
changed, the appropriate changes must be integrated into 
other programs that use this file. In a database 
application the application programs are not concerned with 
the structure used for data storage. This function is 
assigned to the "Database Mangement System" and thereby 
achieving a program/ data independence [Ref. 1], 

Finally, the use of database processing has the advan- 
tage of better data management. Maintenance or updating of 
data can be much easier in a centralized database system and 
without (or at least with a minimum amount of) data 
duplication [Ref. 1], 

C. DEFINITIONS AND TERMINOLOGY 

Before presenting a general overview of such a database 
system, some basic definitions and terminology should be 
prov ided . 

a) A "Database" is a shared collection of interrelated 
data designed to meet the varied information needs of 
an organization. 

b) A "Database Management System" (DBMS) is a software 
system that performs all user's requests (update, 
insert, delete, retrieve) for data. 

c) A "Database System" is a system to record and maintain 
information that is significant to an organization in 
the decision making process. 
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d) A "File" is an organized collection of records 
representing entities of the same type. 

e) A "Record" is a collection of data concerning one 
entity of a file. Each record has an identical 
fo rmat . 

f) A "Field" is a subdivision of a record and it contains 
a unit of information. It is the smallest unit of 
named data. 

g) A "Key" is an attribute, or a set of attributes, whose 
value uniquely identifies each entity in a file. 

h) A "Data Definition Language" (DDL) is a specialized 
language used for the description of the database. 

i) A "Data Manipulation Language" (DML) is the 
programming language used to formulate queries or to 
write application programs for data manipulation. 

j ) -• A "Relationship" between files is an ordered list of 

these files. The relationship can be subdivided into 
the following three categories: 

(1) "One-to-one" relationship, when for each entity of 
a set of entities there is only one associated 
entity in another set of entities and visa versa. 

(2) " One-to-many" relationship, when for each entity 
of a set of entities there are many associated 
entities in another set of entities. 

(3) "Many-to-many" relationship, when each entity of a 
set of entities can be related with any number of 
entities in another set of entities and visa 
versa . 



D. THE ARCHITECTURE OF A DATABASE SYSTEM 

It is apparent from Figure 2, that the most important 
element in the system is the Database Management System 
(DBMS) . This system controls the sequence of actions that 
are taken to store or retrieve data from the database. The 
basic components of such a system are shown in Figure 3 
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Figure 3. Schematic diagram of a database system 
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The 



(enclosed in dotted lines). In this figure [Ref. 2] a 
schematic diagram of a typical database system is repre- 
sented. The non-shadowed rectangles represent software 
routines . 

Queries coming either from application programs or 
directly from a user are routed to the query processor, 
query processor needs to know the structure of the database 
in order for the query to be interpreted in the context of a 
particular database system. Information about the database 
can be built into the query processor itself or it can be 
stored separately (as in Figure 3) in database description 
tables. [Ref. 2] 

The processed query is passed to a collection of 
routines called the "Database Manager". The database 
manager must be able to perform the following tasks: 

a) To translate the query into terms that the "File 
Manager" can understand, i.e., into operations on 
files rather than on the more abstract data structures 
of the database description. 

b) To provide the appropriate security, so that only 
authorized personnel are able to access the data 
stored in the database. 

c) To validate the insertion or deletion requirements of 
a user query. 

d) To provide synchronization when multiple users attempt 
to access the database at the same time. 

The "File Manager" could be the general purpose file 
system provided by the underlying operating system, but in 
general it is a specialized file system able to handle the 
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complex file structures used to store the database 
information. Such complex structures are used to facilitate 
the rapid access and manipulation of data in the database 
[Ref. 2] . 

In a database system a variety of forms, or views, of 
data are defined. These views can be seen as different 
levels of abstraction that are used for the description of 
this database system. From these views the most commonly 
used are those represented in Figure 4 [Ref. 2], i.e., the 

"External" view, the "Conceptual" view, and the "Internal" 
view. 

The "Conceptual" view, also called "schema" is the 
complete and logical view of data. In other words, 
regardless of how data is actually stored in its physical 
storage device, it is represented in such a way that can be 
understandable by a human. 

Externa) view Conceptual view Internal view 
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But in general it is not desirable that every applica- 
tion program be able to access all the data in the database. 
So, another view is defined called "subschema" or "External" 
view and it defines a subset of the schema to be seen by a 
given application program or a user. There may be more than 
one external view, and they can overlap each other . 

Finally, the third view of the data, called "Interval" 
view of "Physical" view is used to describe the form of the 
data as it appears to a particular processing computer, 
i.e., how data is physically arranged, and how it is 
allocated to files. 

The following example makes the above distinction 
between views more understandable [Ref. 1]. 

For a database system used by a bank, the "database 
schema", or the "conceptual" view, might include the records 
for customers, the records for the checking accounts, the 
records for the savings accounts, the records for the loans, 
and the credit records. 

Different "external" views, or "subschemas", can be 
defined. One may contain the customer records and the 
records for checking accounts. This would be the "checking 
subschema". Another may contain customer, loan and credit 
records and thereby be the "loan subschema" and so on. 

Finally, the "internal" view has nothing to do with the 
customers, loans, credits, etc., but it describes what data 
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is used, how it is physically arranged and how it is 
allocated in files. 

E. DATA MODELS 

The real world associations of objects and events have 
to be represented as a "model", in order for this represen- 
tation to be understandable. The same thing is required for 
the data representation. The model used for the data 
representation is called the "data model" and it is an 
abstract representation of the data about entities, events, 
activities, and their associations. 

In the commercial database systems three kinds of data 
models are, in general, used. These data models are the 
"Hierarchical data model", the "Network data model", and the 
"Relational data model". Each one has its own features, 
advantages, and limitations. 

1 . The Hierarchical Data Model 

In a hierarchical data model the data is represented 
as a set of nested one-to-many and one-to-one relationships. 

The tree structure is used, and an organization is 
viewed as a hierarchy of positions. Multiple tree 
structures can be used in the same database and each tree 
consists of a hierarchy of records. Figure 5 gives an 
example of a representation of data organized in a tree 
structure . 

The advantage of this data model is its data struc- 
ture. The tree structure is well known and widely used in 
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Figure 5. A Hierarchical data model 




Figure 6. A Network data model 
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many other applications in addition to databases. The 
disadvantage is that this model cannot support the many-to- 
one relationship and, as a result, redundancy of data 
occurs . 

2 . The Network Data Model 

The data in a network data model is represented by a 
set of record types and pairwise relationships ’between these 
record types. 

The network data model supports the use of multiple 
one-to-many and many-to-one relationships between the same 
pair of record types, but relations that involve more than 
two record types are not directly permitted. In other 
words, the many-to-many relationship is not supported by the 
network models. 

The basic data structure in a network database is 
the graph and Figure 6 provides an example of such a 
structure . 

The network data model can be viewed as an extension 
of the hierarchical data model, or the hierarchical data 
model can be considered as a special case of a network data 
model, because both models use as a basic data structure the 
graph (a tree structure is always considered a special case 
of a graph). Neither can support the many-to-many relation- 
ship and only the network data model can support the many- 
to-one relationship. This is in fact the basic difference 
between a tree structure and a graph. 
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3. The Relational Data Model 



The relational data model differs from the 
hierarchical and network data model. The mathematical 
concept which the relational data model is based on is the 
set theoretic relation. Some definitions [Ref. 2] of this 
theory should be given at this point for better represen- 
tation of this model. 

a) Domain is simply a set of values, and it is written as 
D i‘ 

b) The Cartesian product of domains D-^ , D- , D^r •••f D 
which is written as D^XD^XD^ • • . XD^ is the set of all 
n-tuples (u^, U 2 , u^f ..., u n ) such that u-^ is in D-^ , 
U 2 is in D 2 ^ ana so on. 

c) A relation is a subset of the Cartesian product of a 
list of domains. 

d) Tuples are the members of a relation. 

Relations are represented as two-dimensional tables. 
Each row in such a table is a tuple, and each column corre- 
sponds to one component. Columns are given names called 
"attributes" and each column contains values about the same 
attribute. When attribute names are attached to columns of 
a relation then the order of the columns becomes unimpor- 
tant. The set of attribute names for a relation is called 
the "relation scheme". Figure 7 shows a representation of a 
relation . 

A relational data model represents data as a 
collection of relation schemes. Tables that are used to 
represent the relations must have the following properties: 
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a) Each column of such a table must contain values about 
the same attribute. 

b) Each column must have a distinct name. 

c) Each row is distinct. 

d) The sequence of the rows is immaterial. 



Attributes 



<S) 

0 ) 

Q. 

3 ' ' 

h- • 1 



■* 



Figure 7. A Representation of a Relation 



The advantage from the use of the tables as a repre- 
sentation method is that the tables are more understandable 
than the graphs or the trees. In addition to its mathemati- 
cal basis, a. relation data model differs from a hierarchical 
or a network data model in the following points: 

a) All the types of relationships (one-to-one, one-to- 
many, and many- to-many ) are supported by this model. 

b) The query languages that are used in this data model 
allow the manipulation of data as groups and not 
procedurally as one record at a time. 

c) Finally, the relational data model provides more data 
flexibility since relationships need not be predefined 
during the design phase. 
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II. ANALYSIS 



According to the traditional approach for a software 
development, systems development can generally be thought as 
having two major components: systems analysis and system 

design. 

System analysis is the process of gathering and 
interpreting facts, and using the facts to improve the 
existing system through better procedures and methods. 

System design is the process of planning a new system to 
replace or complement the old one [Ref. 3]. In other words, 
analysis specifies what the system should do, and design 
states how to accomplish the objectives. 

The first step of the analysis phase is the system study 
which includes the accumulation of all existing information 
that leads. to the need of a new system development as well 
as the collection of all problems related to the system in 
use . 

The description of the existing situation and of the 
problems related to this situation is very important for two 
tasks of the analysis phase. 

First, if the existing problems are well described, the 
requirements for the new system can be stated clearly, 
unambiguously and exhaustively. 
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Second, it is much easier for the person who has the 
authority to acept or not the starting of a project, to 
determine if the elimination of the existing problems and 
the proposed improvements satisfy one or more of the reasons 
for a project initiation. 

Accordig to J. A. Senn [Ref. 3] the reasons for a 
project initiation are the following: 

a. Greater processing speed 

b. Better accuracy and improved consistency 

c. Faster information retrieval 

d. Reduced cost 

e. Better security 

In general, all of the above reasons should be satisfied 
by the use of a new system, but it is in each organization's 
responsibility to decide how many of the above reasons 
should be satisfied in order to make the determination if a 
new system is reasonable to be developed. 

In the following parts of this chapter, the existing 
system will be described, an examination will be done of how 
many reasons for a project initiation are satisfied, and the 
requirements of the system under development will be stated. 

A. DESCRIPTION OF CURRENT SYSTEM 

As previously mentioned, standards exist for personnel 
organization in a battle ship so as to afford the ship the 
ability to operate under a variety of conditions. 



27 



According to the Hellenic Navy standards, which do not 
differ much from the standards used by other countries, the 
personnel in a battle ship are divided into two major 
categories. The first category includes personnel belonging 
to the "Deck" department and the second category includes 
the personnel belonging to the "Machine" department. 

Each department must provide a number of functions to 
the operation of the ship. These functions usually form a 
hierarchy of subdepartments within the main department. 

The "Deck" department serves all the needs of a battle 
ship from a war machine point of view and it includes all 
subdepartments partitioning this task, i.e., the 
"Communication" subdepartment, the "Weapons" subdepartment, 
the "Combat Information" subdepartment, etc. 

The "Machine" department serves all the needs of a 
battle ship from the movement and repair point of view and 
it includes all the subdepartments whose functitons are 
related to these purposes, i.e., the subdepartment "Damage 
Control", the subdepartment "Electric Installation", the 
subdepartment "Main Engines", etc. 

In larger ships, other departments exist. Among them 
are the "Supply" department and the "Sanitary" department. 
The functions of these departments are not at all ignorable. 
Small ships must have the appropriate personnel to provide 
the functions of these departments, but in an environment 
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whose personnel is limited, these departments do not exist 
as individual departments. The personnel responsible for 
supporting the real functions of these departments are, in 
general, attached to the "Administration" subdepartment of 
the "Deck" department. 

Table I shows the subdepartments that each of the main 
departments include. Since the model of a small ship will 
be used in this study only the "Deck" department and the 
"Machine" departments are represented. 

Also in Table I, the "Administration" subdepartment is 
considered to belong to the "Deck" department. This is not 
exactly the case since the "Administration" subdepartment 
must have access to all personnel in a battle ship. The 
reason for this representation is that the supervising 

TABLE I. 

CLASSIFICATION OF DEPARTMENTS AND SUBDEPARTMENTS 





DEPARTMENTS 


DECK 


MACHINE 


SUBDEPARTMENTS 


ADMINISTRATION 


DAMAGE CONTROL 


WEAPON 


ELECTRIC INSTALLATION 


COMBAT INFORMATION 


ELECTRONIC EQUIPMENTS 


COMMUNICATION 


MAIN ENGINES 


NAVIGATION 


SPARE PARTS 
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officer of this subdepartment is the Executive Officer of 
the battle ship who belongs to "Deck" officers. 

Each subdepartment provides a number of functions. For 
this reason several jobs have been identified and assigned 
to personnel belonging to this subdepartment. Because each 
person has to provide not only a specific job, but a group 
of related jobs, "job position" descriptions are used as a 
subclassification of the subdepartments. Each job position 
in general, includes more than one job, but it is assigned 
to a single person. 

From another point of view, personnel are divided into 
three categories based on their rank: officers, non- 
commisioned officers or petty officers, and the lower level 
personnel which will be referred to as seamen. 

The personnel of each category are divided into a number 
of subcategories according to specialization of each person. 

Table II shows the three categories of the personnel 
according to those ranks, as well as the specializations 
that each category includes. 

The specialization assigned is based on the education 
and training levels of each person. These specializations 
remain with an individual throughout his entire military 
career . 

These two classifications, that is the classification of 
the job stations of a battle ship in departments and 
subdepartments, and the classification of the personnel 
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TABLE II. 

PERSONNEL CLASSIFICATION ACCORDING TO SPECIALIZATIONS 





OFFICERS 


N.C. OFFICERS 


SEAMEN 






WEAPON USER 


WEAPON USER 


z 

o 




WEAPON CONTROL 


WEAPON CONTROL 


1— 

< 




COMMUNICATION 


COMMUNICATION 


DECK OFFICER 


NAVIGATION 


NAVIGATION 


KJ 




RADAR USER 


RADAR USER 


1 

< 




SANITARY 


SANITARY 


u 




SUPPLY 


SUPPLY 


LU 




ELECTRICIAN 


ELECTRICIAN 


LL 

CO 


ENGINEER 


ELECTRONIC 


ELECRONIC 






ENGINEER 


ENGINEER 



according to individual specializations are related to the 
duty assignment problem. 

Table III shows the relationship between the subdepart- 
ments belonging to the "Deck" department, and personnel 
special izations. 

The "Administration" subdepartment does not require 
any specialization of its personnel. In general, the 
appropriate personnel are distributed across other 
subdepar tments . 

In entries for both non-commissioned officers and for 
seamen the word "ANY" is written to indicate that there is 
no need for a specific speci al i zat ion in this position. 
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TABLE III. 



RELATIONSHIP BETWEEN "DECK" DEPARTMENT 
AND PERSONNEL SPECIALIZATION 





SUBDEPART M 


ENTS 




ADMINISTR. 


ARMAMENT 


COMBAT INFO. 


COMMIJNICAT 


NAVIGATION 


' DECK DEPARTMENT 


OFFICER 


DECK OFFIC. 


DECK OFFIC. 


DECK OFFIC. 


DECK OFFIC. 


DECK OFFIC. 


SPECIALIZATIONS 






















N.C.QFF 


ANY 


WEAP.USER 


WEAP.CONTR. 


COMMUNICAT 


NAVIGATION 


SANITARY 




RADAR USER 






SUPPLY 










| SEAMEN 


ANY 


WEAP.U5ER 


WEAP.CONTR. 


COMMIJNICAT 


NAVIGATION 


SANITARY 










SUPPLY 











Usually persons with high levels of education, as for 
example persons of "Sanitary" or "Supply" specialization, 
are attached to this subdepartment because the physical 
subdepartments do not exist. 

The same situation exists in the "Machine" department, 
and the relationship between the subdepartments of this 
department and the personnel specializations is indicated in 
Table IV. 

The exception here is the "Spare Parts" subdepartment, 
but again it is assembled by appropriate personnel 
distributed over other subdepartments of this department. 



32 



TABLE IV. 



RELATIONSHIP BETWEEN "MACHINE" DEPARTMENT 
AND PERSONNEL SPECIALIZATION 







SUBDEPARTMENTS 






DAMAGE CTRL 


ELECT R.l NST 


ELECTR. EQUIP 


MAIN ENGINES 


SPARE PARTS 




DC 

LU 


ENGINEER 


ENGINEER 


ENGINEER 


ENGINEER 


ENGINEER 


UJ 

21 


CJ 

Ll_ 












\— 

CL 


u. 

O 












< 

CL 


U- 

li- 


ENGINEER 


ELECTRICIAN 


ELECTRONIC 


ENGINEER 


ANY 


UJ 

Q 


o 

CJ 












UJ 


~ZL 












5 


LU 


ENGINEER 


ELECTRICIAN 


ELECTRONIC 


ENGINEER 


ANY 


u 

< 


Z 

<1 


ELECTRICIAN 










V“ 


UJ 

CO 


ANY 











Up to this point the procedure of assigning the 
appropriate personnel to the appropriate departments and 
subdepartments is straightforward and not difficult, except 
in the case of assembling the "Administration" and the 
"Spare Parts" subdepartments. Even then the selection of 
the appropriate persons can be easily accomplished. 

Therefore, each person of the crew is assigned to a 
specific department and subdepartment, and the officer who 
manages the subdepartment, is responsible for the assignment 
of specific jobs to each member of his subdepartment. He 
is also charged with providing for the training of the 
personnel for which he is responsible, and the cooperation 
of his subdepartment with the other subdepartments. 
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The Executive Officer of the ship is the supervisor of 
all the subdepartments belonging to the "Deck" department, 
and the Chief Engineer of the ship supervises the subdepart- 
ments which belong to the "Machine" department. 

There are differences between the operation of a battle 
ship and the operation of a commercial organization, where 
personnel arrive each morning, work for a specific period of 
time and leave until the next working day. A battle ship is 
an organization which must operate on an "around the clock" 
basis. Personnel are usually divided into shifts to cover 
the entire day. 

Shift structures are not the same in all cases. For 
example, three 8-hour shifts, with equal number of persons 
in each one, usually suffice for the daily and routine work 
in port and during periods at sea with no threats, levels of 
alert or exercises. During periods of increased activity, 
as for example during exercises, two shifts, again with 
equal number of persons in each one, are required for ship 
operation. At times all personnel are called to duty when 
any kind of threat or level of alert exists. To plan for 
all three cases, job assignment is complicated by cross 
assignment of personnel. It must by necessity be done in 
advance . 

In addition to the above, there are times when specific 
conditions occur which • requ ire that special purpose groups 
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must be assembled to facilitate temporary functional 
requirements. This further complicates job assignment since 
the absence of these personnel from their normal positions 
must not interrupt, even temporarily, the operation of the 
department, or subdepartment. 

Related to the task of job assignment, is the completion 
of regular monthly, semiannual, annual, and "upon request" 
personnel reports. Some of them are simple and only require 
information stored in a single file. But some are compli- 
cated and require a time consuming examination of a variety 
of documents in order to extract the required information 
for the report. Some of these reports are critical for the 
current and future operation of the battle ship and must be 
complete and accurate. For example, the tables reflecting 
the future needs in lower level personnel must be maintained 
and available upon request. 

B. PROPOSED IMPROVEMENTS OVER CURRENT SYSTEM 

All the previously described tasks are currently 
provided manually. Therefore, the following improvements 
can be achieved by computer automation: 

a) The processing speed will be much higher. 

b) Improved accuracy in data retrieval can be achieved if 
the criteria for the job assignments is carefully 
described and taken into account in the application 
programs. Also in the case of reports and listings 
the possibility of information omission is eliminated. 

c) The retrieval and listing of information will be much 
faster, easier and real time. 
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d) In a military environment, the cost of the manually 
provided functions cannot be easily estimated. 
Therefore, cost reduction as a requirement cannot be 
considered in the improvements of the existing system, 
except in terms of time. On the other hand, the 
monetary cost of installing a computer system is 
considered not significant since the proposed system 
will be designed so as to be supported by a 
microcomputer . 

e) The level of security afforded the personnel informa- 
tion can be improved according to organizational 
requirements (in this case according to the security 
rules on a battle ship) . 

The previously mentioned possible improvements lead to 
the decision that this project is reasonable to start. It 
satisfies the requirements for project initiation as stated 
in the beginning of this chapter. 



C. SYSTEM REQUIREMENTS 

The system must be able to satisfy the following 
requirements so that the previously defined improvements can 
be achi eved : 

a) It must be able to store any information about 
personnel on a battle ship that is currently stored on 
papers. Actual storage may be different from the 
traditional organization in a files point of view, but 
some modifications in storage are necessary to avoid 
data duplication. 

b) It must be able to provide any stored information or 
any combination of stored information upon request. 

c) It must include sufficiently defined criteria so as to 
provide solutions for the job assignments as accurate- 
ly, effectively, and equitably as possible. 

d) It must be easy to use, or useable by personnel 
without special computer knowledge or skills. 

e) It must be supportable on a microcomputer system. 
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D. SPECIFICATIONS OF THE BATTLE SHIP THAT WILL BE USED AS 
A MODEL 

1. Personnel 



Sixty-three men will be considered as ship's company 
on a battle ship. These men are divided into the following 
categories by rank: 

a) The Commanding Officer 

b) Six more Officers. Four of them are Deck Officers and 
two Engineers. Each one must be able to manage one or 
more subdepartments within his specialization. 

c) Twenty-one Petty Officers. Four of them are Master 
Chief Petty Officers, three Senior Chief Petty 
Officers, three Chief Petty Officers, three Petty 
Officers 1st Class, three Petty Officers 2nd Class, 

- and five Petty Officers 3rd Class. All Petty Officers 
are assigned to subdepartments according to his 
individual specializations. 

d) . Thirty-five Seamen. These men are assigned to 

subdepartments according to their specialization. 

2 . Ship Characteristics 



From the armament point of view, the battle ship 
that will be used as a model for this application is 
equipped with the following weapons as shown in Figure 8. 

a) Three 3" Automatic Guns. These guns are controlled by 
the central armament control console or locally by 
individual control consoles. They are referred to as 
GUN 31, GUN 32, and GUN 33. 

b) Two 40mm Automatic Anti-Air Guns. These are also 
controlled by the central armament control console or 
locally by a user, and will be referred to as GUN 41 
and GUN 42. 

c) Two Groups of Surface to Air Missiles. These will be 
referred to as A/A MISSILES 1 and A/A MISSILES 2, and 
are controlled by their own firing and control 

conso le . 
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I 

I 



GUN 3 



a 



A/A MISSILES A/A MISSILES 

GROUP 1 GROUP 2 

- r-/ V 

BRIEDGE 



GUN 4 1 



S.S. MISSILES 
GROUP 1 




GUN 42 



S.S. MISSILES 
GROUP 2 



TORPEDO [ 1 i [ 1 TORPEDO 

TUBE 1 M TUBE 2 

_\ZJ t= _ 

Figure 8. Model ship’s weapons arrangement. 
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d) Two Groups of Surface to Surface Missiles. These will 
be referred to as SS MISSILES 1 and SS MISSILES 2, and 
are also controlled by their own individual consoles. 

e) Two Surface to Surface Torpedoes. These will be 
considered as controlled from the central armament 
control console and will be referred to as TORPEDOl 
and TORPEDO 2 . 

f) One Long Range Radar. This will be used for air 
target detection and will be referred to as the AIR 
RADAR. 

g) One Medium Range Radar. This will be used for surface 
target detection and will be referred to as the 
SURFACE RADAR. 

h) Another Medium Range Radar. This will be used for 
navigation purposes and will be referred to as the 
NAVIGATION RADAR. 

i) .. One Tracking Radar. It will be considered as 

cooperating with the central armament control console. 

j) Additional Equipment. These additional equipments 
include anything remaining that is required to fulfill 
the mission of the battle ship. For example, the 
communication equipment, the ESM (Electronic Support 
Measure) equipment, the ECM (Electronic Counter 
Measure) equipment, etc. 

From the machine or power plant's point of view, 
the model is equipped with the following: 

a) Two Main Engines. Each one is installed in one of two 
engine rooms. The operating indicators • and their 
controls are installed in the engine control room. 
These engines will be referred to as MAIN ENGINE 1 and 
MAIN ENGINE 2. 

b) Three Electric Generators. These three generators 

provide the required electric power for the operation 
of all electrical equipment on the ship. They are 
referred to as ELECTRIC GENERATOR 1, 2, and 3. 

c) Two Electric Power Distribution Tables. These are 
used to distribute the electric power to the 
appropriate destinations and they will be referred to 
as ELECTRIC POWER DISTRIBUTION TABLE 1 and ELECTRIC 
POWER DISTRIBUTION TABLE 2. 



39 



Ill . 



DESIGN 



According to the traditional definition of the design, 
when it is referred to the software development, it is the 
translation of requirements into ways of meeting them. 
Systems design proceeds through the two phases: the logical 

design phase and the physical design phase [Ref. 3]. 

The systems logical design consists of the description 
of its features, that is the description of the outputs, the 
inputs, the files, and the procedures, all in the manner 
that meets project requirements. 

The systems physical design is the set of activities 
following the logical design. It consists of a model for 
the production of a working system, that is the production 
of a system that accepts input from the users, processes 
data, and produces the appropriate reports. 

In this chapter the logical design of the system under 
development, the features of the database management system 
that will be used, and the hardware requirements will be 
represented. The physical design of the system will be 
represented in the following chapter as "Implementation" of 
the system. 

A. LOGICAL DESIGN 

According to the requirements of the system, as 
previously stated at the end of the previous chapter, it 
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must be usable by personnel with very little knowledge about 
computers . 

Therefore, the architecture of the system should be 
based on a sequence of menus and submenus which lead the 
user to the appropriate action. Figure 9 shows the 
architecture of such a menu driven system. 

1 . Classes of System Operations 

The system will provide the following four classes 
of operations. 

a. Modifications of the Existing Data 

The user of the system should be able to insert 
a new record, to delete an existing one and to modify any 
record in the supporting system files. 




SUBMENU I 



SUBMENU2 



N 



0 



N 



1 






SUBMENU N 




0 

1 

N 



Figure 9. The Architecture of a "Menu Driven" System 
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b. Crew Allocation 

The system should be able to provide different 
types of crew allocation. For example, it must allocate the 
crew into two or three shifts, and to assign members of the 
crew to the appropriate positions during special alert 
conditions. The type of crew allocation should be user 
selected from the appropriate submenu. The criteria used 
for each type of crew allocation will be described with the 
corresponding application program. 

c. Production of Reports 

A number of application programs will support 
the function of retrieving necessary information on 
personnel from the database and producing the appropriate 
lists and reports. 

d. Assistance Operations 

Although the above operations can satisfy the 
requests of the system, an additional function related to 
the tracking of modifications that have been done to the 
supporting system files is necessary. This audit trail will 
be contained in a file "Spy" in which any modifications of 
the supported files will be recorded with the time, the 
date, and the user's name. This file should not be accessi- 
ble through the main menu or any submenu for security 
reasons. Also system access security should be provided at 
system start-up through a password control system. 
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A "USER" file will contain user(s) characteris- 
tics and corresponding password (s). A second file "STATIST" 
will accumulate the information on members of the crew that 
are deleted for any reason. Neither file should be 
accessible through the menu system. 

2 . The Output Reports 

Before describing the supporting system files, it is 
desirable to describe the required outputs. This can help 
to better understand and organize data into the supporting 
system files, which in turn supports avoidance of data 
dupl ication . 

The required system output reports in the form of 
tables and lists are the following: 

a) Crew allocation into 2 shifts 

b) Crew allocation ' into 3 shifts 

c) Crew allocation for surface alert 

d) Crew allocation for air alert 

e) Crew allocation for general alert 

f) List of men available to participate in some special 
purpose groups during one of the above alerts 

g) List of personnel that serve in the battle ship in 
some user defined order 

h) List of the personnel with those current service time 
in the ship 

i) List of the personnel with their home addresses, and 
phone numbers 

j) List of the personnel allocated into departments 

k) List of the personnel allocated into subdepartments 
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3 . Required Input Information 



In order to provide the previously described output 
reports, the following information must be input to the 
system . 

a. Personnel Information 

Each member of the crew in the battle ship has, 
in addition to his name, a serial number, a rank, a job 
specialization, a home address, and a home phone number. 

Also he has a specific date in which he has been received on 
the battle ship and a date that he will finish his service 
obligations (in case he belongs to lower level personnel) or 
he will depart from the ship for another tour of duty. In 
the latter case the date of departure is not always known in 
advance, but is announced a few months before the departure. 

The above information about the personnel is 
enough for the construction of the periodic reports 
previously described. However, for job assignments 
additional information is required. 

b. Job Position Information 

In order for the assignment of job positions to 
be successful in the various cases, first the description of 
the job positions must be included in the input information. 
Additionally, the specialization and rank of the required 
crew member must be stated. Finally the hierarchical 
structuring of the departments and subdepartments along with 
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the specializations of the personnel that each one requires 
must be stated . 

4 . Description of the Supporting Application Files 
The following files should be used in order to 
include all required input information, 
a. Personnel File 



Structure for file: CREWMEMB 



FIELD 


NAME 


TYPE 


WIDTH 


01 


SERNO 


c 


5 


02 


NAME 


c 


18 


03 


RANK 


c 


4 


04 


SPEC 


c 


4 


05 


INDATE 


DATE 


8 


06 


OUTDATE 


DATE 


8 


07 


ADDRESS 


C 


20 


08 


PHONE 


C 


8 


Ranks 


File 








Structure for 


file: RANKS 




FIELD 


NAME 


TYPE 


WIDTH 


01 


RANKCODE 


C 


4 


02 


RANKNAME 


C 


15 
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c. Specialization File 





Structure for file: 


SPECI ALT 




FIELD 


NAME 


TYPE 


WIDTH 


01 


SPECODE 


C 


4 


02 


SPECNAME 


C 


15 


03 


SUBDPCODE 


C 


4 


d. Sudepartment File 








Structure for file: 


SUBDEPTN 




FIELD 


NAME 


TYPE 


WIDTH 


01 


SUBDPCODE 


C 


4 


02 


SUBDBNAME 


C 


15 


03 


DEPCODE 


C 


4 


e. Department File 








Structure for file: 


DEPARTM 




FIELD 


NAME 


TYPE 


WIDTH 


01 


DEPCODE 


C 


4 


02 


DEPNAME 


C 


10 



f. Alert File 

The alert file contains the positions that 
should be filled during a general alert with the 
requirements for rank and specialization of the individual 
who will fill each position. 
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Structure for 


file: ALERT 




FIELD 


NAME 


TYPE 


WIDTH 


01 


POSCODE 


C 


4 


02 


DESCR 


C 


15 


0 3 


REQSPEC 


C 


4 


04 


REQRANK 


C 


4 


File 


Containing the 


Crew Member's 


Reques 


Leave 








Structure for file: REQLEAVE 




FIELD 


NAME 


TYPE 


WIDTH 


01 


SERNO 


c 


5 


02 


REMLEAVE 1 


N 


2 


03 


REQUEST 1 


DATE 


8 


04 


REQ1DUR 


DATE 


8 


05 


REQUEST 2 


DATE 


8 


06 


REQ2DUR 


DATE 


8 



h. File Containing the Users' Name and 
Corresponding Passwords 



Structure of files: USERS 



FIELD 


NAME 


TYPE 


WIDTH 


01 


PASSWORD 


C 


6 


02 


USERNAME 


C 


18 
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i 



Spy File 



j 



Structure for file: SPY 



FIELD 


NAME 




TYPE 


WIDTH 


01 


DATE 




DATE 


8 


02 


TIME 




C 


5 


03 


USERNAME 




C 


18 


04 


JOBDESCR 




C 


12 


05 


PROGNAME 




C 


10 


File th 
o f the 
Ship's 


at Contains the Information 
Crew that Have Been Deleted 
Organization for Any Reason 


on Memb< 
from th 


Str 


ucture for file 


: STATIST 




FIELD 


NAME 




TYPE 


WIDTH 


01 


SERNO 




C 


5 


02 


NAME 




C 


18 


03 


RANK 




C 


4 


04 


SPEC 




C 


4 


05 


INDATE 




DATE 


8 


06 


OUTDATE 




DATE 


8 



5. 



Description of the Codes Used in the Supporting 
Application Files 



a. Codes for Ranks 

CODE NAME 

FF10 COMMANDER 

FF 20 LT. COMMANDER 
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FF 30 



LIEUTENANT 



FF4 0 


LIEUTENANT JG 


FF50 


ENSIGN 


PFl 0 


MASTER CHIEF PO 


PF20 


SENIOR CHIEF PO 


PF 3 0 


CHIEF PO 


PF4 0 


PO 1ST CLASS 


PF5 0 


PO 2ND CLASS 


PF60 


PO 3RD CLASS 


SMI 0 


SEAMAN 


for Specialization 
CODE 


NAME 


D001 


DECK 


DO 0 2 


WEAPON USER 


D00 3 


WEAPON CONTROL 


D00 4 


COMMUNICATION 


D00 5 


NAVIGATION 


DO 0 6 


RADAR USER 


D007 


SANITARY 


DO 0 8 


SUPPLY 


E001 


ENGINEER 


EO 0 2 


ELECTRICIAN 


E00 3 


ELECTRONIC 
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c. Codes for Departments 



CODE 


NAME 


D000 


DECK DPTM. 


MOO 0 


MACHINE OP. 



d. Codes for Subdepartments 



CODE 


NAME 


D100 


ADMINISTRATION 


D200 


WEAPONS 


D 300 


COMBAT INFO 


D40 0 


COMMUNICATIONS 


D500 


NAVIGATION 


M10 0 


MAIN ENGINES 


M200 


DAMAGE CONTROL 


M30 0 


ELECTRIC INSTAL 


M400 


ELECTRON. EQUIP 


M50 0 


SPARE PARTS 



e. Codes for Alert Positions (POSCODE 



CODE 


DESCRIPTION 


0001 


COMMAND OFFICER 


0002 


NAVIGATOR 


0003 


NAVIG. RADAR 


0004 


HELMSMAN 


0005 


HF BRIDGE COMM. 


0006 


UHF BRIDGE COMM 


0007 


LEFT OBSERVER 
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0008 


RIGHT OBSERVER 


0009 


CIC SUPERVISOR 


0010 


AIR RADAR 


0011 


SURFACE RADAR 


0012 


TRACK RADAR 


0013 


CIC COMMUNICAT. 


0014 . 


E . S . M . 


0015 


E.C.M. 


0016 


CENTR WEAP CONT 


0017 


GUN 31 CONSOLE 


0018 


31 AMMO SUPPL1 


0019 


31 AMMO SUPPL 2 


0020 


GUN 32 CONSOLE 


0021 


32 AMMO SUPP1 


0022 


32 AMMO SUPPL 2 


0023 


GUN 33 CONSOLE 


0024 


33 AMMO SUPPL 1 


0025 


33 AMMO SUPPL2 


0026 


GUN 41 CONTROL 


0027 


GUN 42 CONTROL 


0028 


TORPEDO TUBE 1 


0029 


TORPEDO TUBE 2 


0030 


A/A MISS CONTR 


0031 


A/A MISS TELEPH 


0032 


A/A MISSILES 1 
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0033 


A/A MISSILES 2 


0034 


SS MISS CONTR 


0035 


SS MISS TELEPH 


0036 


SS MISSILES 1 


0037 


SS MISSILES 2 


0038 


RADIO ROOM SUP 


0039 


TELETYPE 1 


0040 


TELETYPE 2 


0041 


HF COMMUNICAT 


0042 


SURG ROOM SUPER 


0043 


SURG ROOM 1 


0044 


SURG ROOM 2 


0045 


SURG ROOM 3 


0046 


ENG CONTR ROOM 


0047 


MAIN ENG 1 ASS 1 


0048 


MAIN ENG 1 ASS 2 


0049 


MAIN ENG 2 ASS1 


0050 


MAIN ENG 2 ASS2 


0051 


ELECTR GENERAT 1 


0052 


ELECTR GENERAT2 


0053 


ELECTR GENERAT 3 


0054 


DISTR TABLE 1 


0055 


DISTR TABLE 2 


0056 


DAMAGE CONTROL 1 


0057 


DAMAGE CONTROL 2 
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0058 



DAMAGE CONTROL 3 



0059 



DAMAGE CONTROL 4 



0060 



DAMAGE CONTROL 5 



0061 



DAMAGE CONTROL 6 



0062 



DAMAGE CONTROL 7 



0063 



DAMAGE CONTROL 8 



B. SOFTWARE REQUIREMENTS FOR SYSTEM IMPLEMENTATION 

The dBASE III, which will be used for the implementation 
of the personnel management system under discussion, is a 
relational DBMS (database management system) for micro- 
computers . 

It contains its own extremely powerful programming 
language which permits the user to easily create his own 
application programs regardless of complexity. 

The most important features as well as the limitations 
of dBASE III, as described by E. Jones [Ref. 4] and A. 
Simpson [Ref. 5] are described below. 

1 . Features of dBASE III 

a) Program/data dependence. Changes in file structure do 
not affect the application programs. 

b) Data can be easily updated. 

c) Date and Memo data types are provided. In addition to 
the common data types, such as characters, numerics, 
and logicals that are provided by other database 
management systems, dBASE III provides the "Date" data 
type which is a very powerful tool for dates 
management, and the "Memo" data type for managing 
texts . 
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d) Information saving. dBASE III can save information as 
disk files in nine specialized formats each serving a 
specific dBASE III processing need. 

e) Sorting and indexing capabilities. 

f) Creation and printing of formatted reports. 

g) Date arithmetic. 

h) Built-in high level DML language. 

i) Interface capabilities. The dBASE III allows 
interfacing with other software systems, i.e., 
SuperCalc, the Symphony, WordStar, etc. 

2 . Limitations of dBASE III 

a. Number of Records in Each File 

Each database file can have up to 1 billion 
records maximum, and the maximum size of each file is 2 
billion bytes. 

b. Number of Fields in Each Record 

Each record can have up to 128 fields. The 
width of these fields can be no longer than 4,000 
characters . 

c. Number of Database Files Open at the Same Time 

Ten database files can be opened at the same 

time, or fifteen files of all types. Seven index and one 
format file can be opened for each active database file. 

d. File Names and Field Name Lengths 

File names can be up to 8 characters long, while 
field names can be up to 10 characters long. 
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e. Active Memory Variables 

The maximum number of active memory variables is 
256. The total number of bytes for memory variables is 
6 , 000 . 

All of the above values may be limited by the 
computer hardware configuration. 

C. HARDWARE REQUIREMENTS FOR SYSTEM IMPLEMENTATION 

The system can operate on a 16-bit microcomputer that 
uses MS DOS or PC DOS version 2.0 or newer, for example on 
an IBM PC, on an IBM PC/XT or any other 16-bit microcomputer 
fully compatible with one of the above mentioned 
microcomputers . 

256K of RAM memory is the minimum requirement of the 
supporting database package. Although one disk drive can 
possibly be used, two disk drives is strongly recommended. 
The best configuration is one disk drive and one hard disk. 

A 10M hard disk is recommended because it is the most 
common, inexpensive, and reasonable configuration of a 
microcomputer. A hard disk is not required because of 
storage requirements, since all files and the application 
programs can be stored on a floppy-disk based system. 
However, it does greatly improve the execution time of the 
programs used in this application. 

Any 80 column printer able to interface with the above 
mentioned microcomputers can be used. 
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IV. IMPLEMENTATION 



The system's "implementation" or "Physical Design" is 
the set of activities following the "Logical Design", and 
it consists of the production of a working system, that is 
the production of a system that accepts input from the 
users, processes data and produces the appropriate reports 
[Ref. 3]. 

One very important job during the development of a 
software product is the construction of the user's manual. 
Without it, only the creator of the system can use it. 

User's manuals differ in size and complexity according 
to the nature of the developed system. Therefore, user's 
manuals can be as simple as a few pages of notes about the 
use of the system, or as detailed as volumes of descriptions 
on the functions of the system. 

The system under development is a "Menu driven" system, 
in which the user is led to the appropriate operation 
through the main menu, the submenus and his answers to the 
questions asked by the system. But, to better support user 
understanding about what is taking place during the various 
actions of the system, a detailed description of the 
application programs is given in this chapter. This 
description is based on operational details rather than on 
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detailed structure of the application programs. It 
substitutes the user's manual. 



A. RUNNING THE SYSTEM 

The user of the system has to call the "MASTER PROGRAM" 
by its name (DO masterpr) . The first thing that this 
program does is to ask the user to insert his password. 
There is a file in the system named "USERS" that contains 
the user(s) name(s) with corresponding password (s). 
Therefore, more than one user can use the system if desired 
This file is not accessible to the user through the main 
menu- or through the different submenus. 

If the user of the system inserts an incorrect password 
he is exited to the operating system after receiving a 
message that he is not an authorized user. If the user 
inserts the correct password, then the "MASTERPR" calls the 
program "MAINMENU" which presents to the user his choices. 
The icon of the main menu is shown in Figure 10. 



MAIN MENU 




EXIT TO OPERATING SYSTEM 


0 1 


UDATE SUPPORTING FILES 


1 


CREW ALLOCATION 


2 


LISTS AMD REPORTS 


3 


EXIT TO dBASE III 


4 



Figure 10. The Icon of the Main Menu 
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If the user's choice is "0" then he is exited to the 



operating system, and if his choice is "4" he is exited to 
dBASE III. The last option is for programmers when any 
modification must be done in any of the application 
programs, and for the manager of the system when he wants to 
access information created by the system but unaccessible 
through the main menu and submenus. In all the other cases 
(choice 1, 2, 3) the appropriate program is called, which in 
turn calls the corresponding submenu for further direction 
of the user through the different operations that the system 
can provide to him. 

A small routine named "DELAY" is frequently used in many 
of the application programs to produce a small delay of the 
messages on the screen. Without this delay the messages 
would not be viewable by the user. 

B. UPDATING THE SUPPORTING SYSTEM FILES 

When the user's choice from the main menu is "1" then 
the "MASTERPR" calls the program "UPDATEDB" . This program 
controls the different options available to the user for 
updating of the supporting system files. 

The menu "SUBMENU 1", is represented to the user, as it 
appears in Figure 11. 

As presented in this submenu, the user has the following 
opt ions : 
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a) To exit into main menu by selecting "0". 

b) To insert new records in "CREWMEMB" file by selecting 

" 1 ". 

c) To modify records in "CREWMEMB" file by selecting "2". 

d) To modify records in "REQLEAVE" file by selecting "3". 

e) To delete records from "CREWMEMB" file by selecting 

"4" . 



SUBMENU 1 

EXIT TO MAIM MENU 0 

INSERT RECORDS INTO CREWMEMB I 

MODIFY RECORDS INTO CREWMEMB 2 

MODIFY RECORDS INTO REQLEAVE 3 

DELETE RECORDS FROM CREWMEMB 4 



Figure 11. The Icon of the Submenu 1 

1 . Inserting Records into "CREWMEMB" File 

When the user selects the option of inserting new 
files into "CREWMEMB", the "INSCREW" program is called. 

This program calls at the program "SCREEN 1" which presents 
to the user's screen a frame in which all interactive 
procedures take place. 

The user is asked to insert the serial number of the 
new crew member to be inserted. If this serial number does 
not exist in the file "CREWMEMB", i.e., the new member does 
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not already exist, the system asks the user if he wants to 
see the codes for ranks and specialties. 

If the user answers affirmatively then the "INSCREW" 
program calls the program "CODESCR" which generates a new 
frame on the user's screen which contains the codes for 
ranks and specialties. 

The "INSCREW" program presents to the user for entry 
all the appropriate fields of a new record, with the 
exception of the field "outdate." The disenrollment date 
for a crew member is in general not known at the time he 
reports to the ship. 

The program inserts the information into the 
"CREWMEMB" file, and prompts the user to update the file 
containing the requests for leave, that is the "REQLEAVE" 
file. The fields of the records of this file are presented 
to the user for input. The user may or may not insert 
information in this file at this time, however, a leave 
request record corresponding to the new member is created at 
this time. 

The system continues with multiple entries depending 
on the user's answer to the system's question "MORE 
INSERTIONS?". When the user has no other insertions to 
make, and he answers "No" to the question "MORE INSERTIONS", 
he is exited to submenu 1, for selection of another option 
or return to the system through the main menu. 
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At the end of the execution (s) of program "INSCREW" 
if any insertions have been made an entry in the "SPY" file 
is automaticallly made with the user name, date, the time 
and the program name. 

2 . Modifying Records in "CREWMEMB" File 

When the user selects the option to modify one or 
more records in the "CREWMEMB" file, the program "SCREEN 1" 
is called to install the interactive frame. The appropriate 
record is located by insertion of the serial number of the 
crew member whose record must be modified, and the 
modifiable fields are presented to the user. The enrollment 
date of the crew member and his specialty are not presented 
because these fields cannot be changed. If the user wants 
help, he can see the codes for ranks by answering "Yes" to 
the corresponding question, which causes the program 
" RANKSCR" to be called which generates a frame containing 
the appropriate information. 

The modified record is presented to the user a final 
time before he is asked for "MORE MODIFICATIONS", while the 
appropriate information is inserted into the "SPY" file each 
time a modification has taken place. 

3 . Modifying Records in "REQLEAVE " File 

When the user selects the option of modifying 
records in the "REQLEAVE" file, the appropriate record is 
located by insertion of the serial number of the crew member 
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whose record must be modified, the corresponding fields from 
a record contained in the "REQLEAVE” file which are modifi- 
able are presented to the user and an entry in the "SPY" 
file is made whenever any modification is made. 

4 . Deleting Records from "CREWMEMB" File 

Finally, when the user selects the option of 
deleting a record from the "CREWMEMB" file, the selection 
sequence of actions is the same. When a record from the 
"CREWMEMB" file is deleted, the record for the crew member 
in the "REQLEAVE" file is deleted also. Information about 
the deleted crew member is inserted into the "STATIST" file 
for statistic purposes, and an entry in the "SPY" file is 
made . 

Other support system files can be updated, but these 
options are not available to the normal user of the system 
for reasons of information integrity. 

C. PERFORMING THE CREW ALLOCATION 

When the user's choice from the main menu is "2" the 
"MASTERPR" calls the program "ALLOCATE". This program 
controls the different options available to the user for 
performing crew allocation. 

The program "ALLOCATE" calls the program "SUBMENU 2 " 
which generates and represents to the user submenu 2,. as 
shown in Figure 12. 

According to this submenu, the user of the system has 
the following options: 
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a) To exit the main menu by selecting "0". 

b) To assign the appropriate persons into the appropriate 
position during a general alert by selecting "1". 
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SUBMENU 2 



EXIT TO MAIN MENU 0 

CREW ALLOCATION FOR GENERAL ALERT 1 

CREW ALLOCATION FOR SURFACE ALERT 2 

CREW ALLOCATION FOR AIR ALERT 3 

CREW ALLOCATION INTO TWO SHIFTS 4 

CREW ALLOCATION INTO THREE SHIFTS 5 



Figure 12. The Icon of the Submenu 2 

1 . Crew Allocation for "General 11 Alert 

When the user selects the option of allocating the 
crew into general alert positions, the "ALLOCATE" program 
calls the "GENALERT" program. This program calls the 
program "SCREEN2" which simply generates a frame on the 
user's screen with program progress reports. 
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The program "GENALERT" creates two files named 
"TMPCREW" and TMPALERT" which are deleted at the end of the 
execution of the program "GENALERT". In the first file the 
"CREWMEMB" file is copied and in the second file the "ALERT" 
file is copied. 

Also the program "GENALERT" erases all records 
contained in the file "GALERT" . In this file the records 
resulting from a previous execution of the program 
"GENALERT" are stored, and they are deleted for storage of 
the records from the new execution of program "GENALERT". 

The file "TMPALERT" is used as a reference, and 
sequentially contains for each record of this file, 
information about the position that must be manned, and the 
required rank (reqrank) and required specialty (reqspec). 
"TMPALERT" file positions are matched with members contained 
in the "TMPALERT" file. 

If a person is found (having the required rank and 
specialty is located) his rank, name, and specialty are 
inserted in the file "GALERT" along with the position code 
and the position description. Otherwise the position 
remains unmanned, and the next position is examined. 

If, after all the positions contained in the file 
"TMPALERT" have been examined and some remain unmanned, the 
user is informed that some positions remain unmanned due to 
a mismatch of the requirements and the personnel availa- 
bility. He is asked if he wants to proceed ignoring the 
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factor rank. If the user agrees only the specialty factor 
is used for matching and, of course, only the unmanned 
positions and the remaining personnel are examined. 

If, at the end of this iteration, positions still 
remain unmanned and personnel are available, the user is 
informed and prompted to fill the remaining positions 
regardless of the rank and specialty of the remaining 
personnel. If his answer is "Yes" this task is performed by 
assigning, in sequential order, the remaining personnel to 
the remaining positions. 

If, at the end of this third loop, personnel remain 
unassigned, the user is asked if he wants to see these 
personnel. If he answers "Yes" then the available personnel 
are displayed to him. The same thing happens whenever the 
user rejects the solution when the required rank or 
specialty is to be ignored. In this case only the positions 
which requirements match exactly with the available 
personnel are filled. The other positions remain unmanned 
and the available personnel are presented to the user for 
manual completion of the allocation. 

At the end of the execution of the program, an entry 
in the "SPY" file is made concerning the execution of this 
program. 

2 . Crew Allocation for "Surface" or "Air" Alert 

The same scenario occurs when the user wants to 
perform a crew allocation for a surface or an air alert. In 
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the first case the program "SURFALERT" is called to perform 
the appropriate allocation and the file "SALERT" is used for 
storage of the records from the new execution of program 
"SURFALERT". In the last case the program "AALERT" is 
called to take care of the crew allocation for a surface 
alert condition and the file "AALERT" is used for storage of 
records from the execution of this program. 

The difference between the crew allocation for a 
general alert and the crew allocation in the last two cases 
is that some positions not required to be manned in each one 
of the last cases are deleted from the "TMPALERT" file 
(which contains the positions to be manned with correspond- 
ing requirements) before any processing takes place. 

3 . Crew Allocation into Two Shifts 

When the user selects the option of allocating the 
personnel into two shifts the program "SHIFT2" is called by 
the program "ALLOCATE". 

The program "SHIFT2" calls the program "SCREEN2" 
which in turn installs the screen frame for interactive use 
during the execution of the program "SHIFT2". 

The file "CREWMEMB" is copied into file "TMPSHIFT" 
and the records in this file are indexed on specialty and 
rank. Therefore, during the division of the personnel into 
two shifts, each shift will contain the same or almost the 
same number of persons of each specialty and rank. The file 
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"TMPSHIFT" is erased at the end of the execution of the 
program "SHI FT 2" . 

Two more files are used and both are cleared of 
contents at the beginning of the execution of the program 
"SHIFT2" . These files are the "SHIFT2_A" and the "SHIFT2_B" 
files. Both contain records resulting from the execution of 
the program "SHIFT2". 

The indexed file "TMPSHIFT" is used and the members 
of the crew are divided into two shifts, i.e., the first 
member into shift A, the second into shift B, the third into 
shift A again, the fourth into shift B, and so on. As 
previously mentioned, the members of the crew in the file 
"TMPSHIFT" are already sorted according to specialty and 
rank. The results of the division, therefore, does not 
differ much according to specialty and rank of the members. 
When the allocation is finished, options are given to the 
user to view one of the two shifts or both on his screen. 
When he does not want to see the shift listing anymore, he 
selects the "exit" option which exits to the submenu 2 for 
performing another option or for exiting from the system 
through the main menu. 

Again a corresponding entry in file "SPY" is made 
for the transaction. 

4 . Crew Allocation into Three Shifts 

The similar routine occurs when the user selects the 
option to allocate the personnel into three shifts. In this 
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case the program "SHIFT 3" is called to perform the required 
allocation and the results from the execution of these 
program shifts are inserted into three files names 
" SHIFT 3_A" , " SH IFT 3_B" , and "SHIFT3_C". 

A small routine named "DELAYl" is used to provide 
the appropriate delay for screen presentations; and an entry 
in the "SPY" file is made for the transaction. 

D. PROCURING THE REQUIRED LISTS 

When the user's choice from the main menu is "3" the 
"MASTER PR" calls the program "REPORTER". This program 
controls the different options available to the user for 
producing the required lists. 

The program "REPORTER" calls the program "SUMENU3" which 
generates and represents to the user the submenu 3 as shown 
in Figure 13. 



SUBMENU 3 



EXIT TO MAIN MENU 0 

LIST OF CREW IN SOME ORDER 1 

LIST OF REQUESTED INFO OF CREW 2 

LIST OF CREW OF A REQUESTED DEPARTMENT 3 

LIST OF CREW OF A REQUESTED SUBDEPARTMENT 4 

LIST OF CREW ALLOCATED INTO 2 SHIFTS 5 

LIST OF CREW ALLOCATED INTO 3 SHIFTS 6 

SHIP ORGANIZATION DURING SURFACE ALERT 7 

SHIP ORGANIZATION DURING AIR ALERT 8 

SHIP ORGANIZATION DURING GENERAL ALERT 9 



Figure 13. The Icon of the Submenu 3 
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According to this submenu, the user of the system has 
the following options: 

a) To exit into main menu by selecting "0". 

b) To produce a list of crew sorted in some user selected 
order by selecting "1". 

c) To produce a list of crew containing only the desired 
information by selecting "2". 

d) To produce a list of specific department members by 
selecting "3". 

e) To produce a list of specific subdepartment members by 
selecting "4". 

f) To produce a list of crew allocated into two shifts by 
selecting "5" . 

g) - To produce a list of crew allocated into three shifts 

by selecting "6". 

h) To produce a list showing the ship's organization 
during a surface alert by selecting "7". 

i) To produce a list showing the ship's organization 
during an air alert by selecting "8". 

j) To produce a list showing the ship's organization 
during a general alert by selecting "9". 

All of the above lists are produceable either on the 
user's screen or on his printer, as selected. 

1 . List of Crew Sorted in Some User Defined Order 

When the user selects the option of producing a list 
of crew members sorted in some order, the "REPORTER" program 
calls the "LIST 1" program. This program clears the file 
"ORDCREW" , which will contain the records created dur.ing the 
program execution. The program "LIST 1" uses the file 
"CREWMEMB" , which contains information on crew members. 
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and replaces the codes used for ranks and specialties with 
their corresponding names. 

The user is asked if he wants the list sent to his 
screen or to his printer, which assigns the appropriate 
value to a Boolean variable named "printer", used for the 
selection of the desired output device. 

The program "SCREEN2" is called which generates a 
frame on the user's screen. In this frame the user options 
are presented. By selecting one of the options the user can 
produce a list of crew members sorted on names, on ranks, on 
enrollment date, or on d isenro llment date. 

At the end of the presentation or printing of the 
list the user is asked if he wants to repeat the process. 

If he answers affirmatively, the action is repeated, 
otherwise he is exited to submenu 3 for another option. 

2 . Lists of the Crew Containing Selected Information 

When the user selects the option of producing a list 
of crew members containing only selected information, the 
"REPORTER" program calls the "LIST 2" program. This program 
clears the file "INFOCREW", in which the records created 
during the program execution are stored, uses the file 
"CREWMEMB" and replaces the codes used for ranks and 
specialties with those names. 

The user is asked if he wants the list on his screen 
or on his printer and the program "SCREEN2" is called to 
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generate the user's option frame. By selecting one of the 
options the user can produce a crew members list containing 
names and ranks, names and phone numbers, names and 
addresses, and names, addresses and phone numbers. The 
lists of these groups are always sorted on names. 

At the end of the presentation or printing of the 
list the user is asked if he wants to view the list again or 
to make another copy; depending on his answer, he is 
provided again with the appropriate list or he is exited to 
submenu 3. 

3 . List of the Crew Allocated to a Specific Department 

When the user wants to produce a list of personnel 
of a specific department, the program "LIST 3" is called by 
the program "REPORTER". The procedures of selecting the 
output device, of presenting the options to the user, and 
for multiple executions of the program "LIST 3" are the 
same as the previously described cases. 

The file "DEPLST" is cleared and used for storage of 
the new records created by the program "LIST 3", and the 
"CREWMEMB" file is used to provide the required information 
of personnel. For each member of the crew contained in the 
"CREWMEMB" file, the code corresponding to his specialty is 
used for indexing. This code is used to search for the 
subdepartment containing this specialty. When the 
appropriate subdepartment is located, its code is used to 
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determine the department in which this subdepartment 
belongs. Finally, when the appropriate department is 
located, its name is inserted to the "DEPLST" file along 
with the other information of the crew member. 

When the desired lists have to be presented on the 
user's screen or printed, the distinction of the personnel 
in each department is made by the use of the department's 
name. The lists are sorted on ranks. 

4 . List of Personnel Allocated to a Specific 

Subdepartment 

In this case the program "REPORTER" calls the 
program "LIST 4". This program controls the sequence of 
actions for the production of the appropriate lists. The 
procedure of production of the desired lists is almost the 
same as described above. 

The names of the departments are presented to the 
user in the option frame. After selecting a department, the 
subdepartments belonging to this department are presented to 
him. From these subdepartments he selects one for which he 
wants a listing. 

Some of the subdepartments, as for example the 
"Administration" subdepartment, must be assembled manually. 
In this case, the system informs the user. Multiple 
execution of the program "LIST 4" is again one of the. user's 
options . 
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5. 



List of the Personnel Allocated into Two Shifts 



When the user selects the option of producing a list 
of crew members allocated into two shifts the program "LIST 
5" is called by the program "REPORTER". This program has 
been constructed with the same logic as the previously 
described programs. However, a lot of processing on files 
and records is not required since the two shifts already 
exist in the files "SHIFT2_A" and "SHIFT2_B". The records 
in these two files need only have the codes used for ranks 
and specialties replaced with their respective names. 

This replacement is taking place under the control 
of the program "LIST 5", and the resulting records are 
stored in the file "SHIFTLST" for the construction of the 
appropriate list. Lists provided by this program are sorted 
on specialty and rank of the personnel. 

6 . List of the Personnel Allocated into Three Shifts 
The program "REPORTER" calls the program "LIST 6" 
whenever the user selects the option of producing lists of 
personnel allocated into three shifts. And in this case, 
three files containing the appropriate shifts are used, 

" SH I FT 3_A" , "SHIFT3JB", AND "SHIFT3_C" files. 

Replacement of the codes used for ranks and 
specialties with their corresponding names must also be 
performed on these files, and the same methods used in 
program "LIST 5" are employed. 
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7. 



List of Ship Organization During "Surface" Alert 



When the user desires a listing of ship organization 
during a "Surface" alert, he makes the appropriate selec- 
tion; the program "REPORTER" calls the program "LIST 7". 

This program uses the file "SALERT" to gather all the needed 
information, and the file "ALERTLST" to store the new 
records created during its execution. 

On this point the user must know that the informa- 
tion that he will receive is derived from the file "SALERT", 
which may or may not contain a complete assignment of 
personnel to all alert positions. This is because the user 
who executed the program "SURFALERT" , from which the file 
"SALERT" is created, has the option to complete the 
allocation manually when a mismatch on ranks or on specialty 
occurs; in which case some of the required positions 
necessary during this alert remain unmanned. If the user 
does not want to complete manually the allocation process, 
he has to execute the program "SURFALERT" to completion. 

8 . List of Ship Organization During "Air" Alert 

The same logic and programs apply here as were used 
in the previous report listing. The program "LIST 8" is 
called by the program "REPORTER". The file "ALERTLST" is 
used again for storage of the new records created during the 
execution of the program "LIST 8" and the file "AALERT" is 
used to provide the appropriate information. In the case of 
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unmanned positions the user must execute the program 
" AIRALERT" to completion through submenu 2, option 3. 

9 . List of Ship Organization During "General" Alert 

When the user selects the option of creating a list 
of ship organization during a "General" alert, the program 
"REPORTER" calls the program "LIST 9". This program uses 
the file "GALERT" to correlate appropriate information, and 
the file "ALERTLST" to store the results of its execution. 

If unmanned positions appear on the lists and the user does 
not want to complete the allocation manually he must 
reexecute the program "GENALERT" , in which the file "GALERT" 
is created, to completion through submenu 2, option 1. 
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V. CONCLUSIONS AND RECOMMENDATIONS 



The purpose of this study was to develop a database 
system model, suitable for implementation within a battle 
ship, and able to aid in the personnel management in this 
environment . 

The main goal is to release manpower for other purposes, 
by increasing effectiveness, accuracy, and speed, of 
personnel management. Another goal was to provide solutions 
to the job assignment problem in a real time environment. 

Three major factors influenced this study. The first 
one is the unclassified nature of it, which required the 
omission of details describing the problem. The second was 
the standar i zat ion of information describing the problem in 
order to more closely accommodate standards used by most 
nations. Lastly, the absence of previous work on the same 
subject has inspired its completion. 

As a result, the developed system must be considered as 
a prototype model, which needs further modification and 
extension in order to be used in a real time environment. 
Although the system must be considered as a prototype in its 
present form, it is still able to substitute some manually 
provided and time consuming jobs, to produce a number of 
reports, and to provide real time management decision 
information . 
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dBASE III is used as a database management system, 
because both the relational data model on which it is based 
and its high level programming language is very suitable for 
implementing such a system. 

The system is "menu driven". Therefore, it is not only 
easy to use but also easy to modify since both the user and 
the programmer are directed to the desired point through the 
sequence of menus and submenus. 

It is already mentioned that this system is a prototype 
model, but due to its ability of easy modification it could 
be the basis for future work which could cover all the needs 
for personnel management in a battle ship. 
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APPENDIX A 



A. MAIN PROGRAM AND MAINMENU 



*** PROGRAM MASTERPR 

* This is the main program of the database system 
CLEAR 

SET TALK OFF 
SET DELIMITER OFF 
SET HEADING OFF 
SET EXACT ON 
PUBLIC psw 

STORE ’ ’ TO psw 

@ 11,30 SAY ’ENTER PASSWORD ==> ’ 

SET CONSOLE OFF 
ACCEPT TO psw 
SET CONSOLE ON 
USE users 

LOCATE FOR password = UPPER (psw) 

IF EOF ( ) 

SET COLOR TO W* 

@ 11,28 SAY ’ UNAUTHORIZED USER ’ 

DO delay 
SET COLOR TO W 
QUIT 
END IF 

CLOSE DATABASES 
STORE - T- TO continue 

DO WHILE continue 
DO rna inmenu 
DO CASE 

CASE choice = 0 
CLEAR 
QUIT 

CASE choice = 1 
DO updatedb 
CASE choice — £ 

DO al locate 
CASE choice = 3 
DO reporter 
CASE choice = 4 
CLEAR 
RETURN 

ENDCASE 

ENDDO 
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SET TALK ON 
SET DELIMITER ON 
SET EXACT OFF 
SET HEADING ON 
CLEAR ALL 
RETURN 



*** PROGRAM MAINMENU 



SYSTEM 0 

FILES 1 



CLEAR 

PUBLIC choice 
STORE 0 TO choice 

SAY ’ IMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM, 
SAY ’ : MAIN MENU 

SAY ’ : MMMMMMMMM 

SAY 
SAY 
SAY 
SAY 
SAY 
SAY 
SAY 

SAY ’ HMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM < ’ 
SET COLOR TO W+ 

0 20,30 SAY ’ENTER YOUR CHOICE ==> ’ , 

GET choice PICTURE ’9’ RANGE 0,5 
READ 

SET COLOR TO W 
RETURN 



0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 



7, 18 

8, 18 
9, 18 

10 , 18 
11,18 
12, 18 

13, 18 

14, 18 

15, 18 

16, 18 
17, 18 



EXIT TO OPERATING 
UPDATE SUPPORTING 
CREW ALLOCATION .. 
LISTS AND REPORTS 
EXIT TO dBASE III 



*** PROGRAM DELAY 

STORE 0 TO k 
DO WHILE k < 40 

STORE k + 1 TO k 
ENDDO 
RETURN 
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B. PROGRAMS IMPLEMENTING THE UPDATE OPERATIONS 



*** PROGRAM UPDATEDB 
CLEAR 

STORE ’ ’ TO updtcorit 

PUBLIC updtcode 

DO WHILE UPPER ( updtcorit ) # ’ N’ 

DO submenul 
DO CASE 

CASE updtcode = 0 

STORE ’ N’ TO updtcont 
CASE updtcode = 1 
DO inscrew 
CASE updtcode = 2 
DO modi crew 
CASE updtcode = 3 
DO mod leave 
CASE updtcode = 4 
DO delecrew 

- ENDCASE 
ENDDO 
RETURN 
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*** PROGRAM SUBMENU 1 



CLEAR 

PUBLIC updtcode 
STORE 0 TO updtcode 



7. 18 SAY 

8. 18 SAY 
9, 18 SAY 

10, 18 SAY 

11.18 SAY 

12. 18 SAY 

13. 18 SAY 

14. 18 SAY 

15. 18 SAY 

16. 18 SAY 

17. 18 SAY 



IMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM, ’ 

SUBMENU 1 
MMMMMMMMM 



EXIT TO MAIN MENU 

INSERT RECORDS INTO CREWMEMB 
MODIFY RECORDS FROM CREWMEMB 
MODIFY RECORDS FROM REQLEAVE 
DELETE RECORDS FROM CREWMEMB 



0 

1 



HMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM < 
SET COLOR TO W+ 

0 19,29 SAY ’ENTER YOUR SELECTION ==> ’ , 

GET updtcode PICTURE ’9’ RANGE 0,4 
READ 

SET COLOR TO W 
RETURN 
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co ro 



*** PROGRAM INSCREW 



* This program inserts new records into CREWMENS file. 

* All other files affected by the newly inserted record 

* are updated 

CLEAR 

STORE 1 Y 1 TO ar.sr 
STORE . Fm TO done 
USE req leave 

INDEX ON SERNO TO reqleave 
USE orewmemb 

INDEX ON SERNO TO crewmernb 

* open he required files 
SELECT 1 

USE users 
SELECT 2 
USE spy 
SELECT 3 

USE reqleave INDEX reqleave 
SELECT 4 

USE crewmernb INDEX ere wrnemb 



DO WHILE UPPER (ansr) = 
CLEAR 
DO screen 1 
SET COLOR TO W+ 

0 3, 14 SAY 1 INSERT 

0 4, 14 SAY 1 ======= 

SET COLOR TO W 



NEW 



RECORD 1 
: = = = = = =* 



STORE 

STORE 

STORE 

STORE 

STORE 

STORE 

STORE 

STORE 



’ TO sno 



’ TO nrn 



TO 

TO 



rnk 

spe 



0 



’ TO idate, odate, req 1 , req£ 
’ TO addr 

’ TO phn 

TO durl, dur£, rrnlv 



£ £0,7 SAY ’ENTER SERIAL NUMBER ==> ’ GET sno , 
PICTURE ’99999’ 

READ 

<? £0, 7 SAY ’ ’ 

FIND &sno 
IF EOF ( ) 

STORE ’ ’ TO ans 

i? £0,7 SAY ’DO YOU NEED CODES? (Y/N) ==> ’ GET ans 
READ 

0 £0, 7 SAY ’ ’ 
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IF UPPER (ans) = ’ Y’ 

DO codescr 
END IF 

@ £0,7 SPY 
& 5, 5 SOY 

@ 6, 5 SOY 

& 7,5 SOY 

@ 8, 5 SOY 

0 9, 5 SOY 

& 10, 5 SOY 
REOD 

OPPEND BLONK 

REPLOCE serno WITH sno, name WITH nrn, rank WITH rnk, , 
spec WITH spe, indate WITH CTOD ( idate) , , 
address WITH addr, phone WITH phn 

STORE . T. TO done 

SELECT 3 

SET COLOR TO W+ 

& 1£, 13 SOY ’UPDOTE REQLEPVE FILE’ 

SET COLOR TO W 



0 


14, 5 


SAY 


’ REMAINING 


LEAVE : ’ 


GET rmlv 


PICTURE ’99’ 


0 


15, 5 


SAY 


’ 1st 


LEOVE 


REQUEST : ’ 


GET req 1 


* 














PICTURE ’ 


99/99/99’ 


0 


16, 5 


SAY 


’ 1st 


LEOVE 


DURATION: ’ 


GET durl 


PICTURE ’99’ 


0 


17, 5 


SAY 


’ 2nd 


LEOVE 


REQUEST :’ 


GET req2 
















PICTURE ’ 


99/99/99’ 


0 


ia, 5 


SAY 


’ 2nd 


LEOVE 


DURATION:’ 


GET dur£ 


PICTURE ’99’ 


READ 














APPEND 


BLANK 










REPLACE 


serno WITH snc 


«, rernleave 


WITH rrnlv 








request 1 


WITH 


CTOD (req 1 ) , 


req 1 dur 


WITH durl, , 






requests 


WITH 


CTOD (req2) , 


req2dur 


WITH d ur2 



’ NOME 


’ GET nrn 


’ RONK CODE 


’ GET rnk 


’ SPEC. CODE 


’ GET spe 


’ENROL. DOTE 


’ GET idate 


’ ODDRESS 


’ GET addr 


’ PHONE 


’ GET phn 



ELSE 

@ £0,7 SOY ’RECORD OLREODY EXISTS’ 

DO delay 

@ £0, 7 SOY ’ ’ 

END IF 

0 £0,7 SOY ’MORE INSERTIONS? (Y/N) ==> ’ SET ar.sr 

REOD 

SELECT 4 
ENDDO 
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psw 



* update SPY file 
IF done 

SELECT 1 
GO TOP 

LOCATE FOR password = 

SELECT £ 

APPEND BLANK 
REPLACE date WITH DATE ( ) 

REPLACE time WITH TIMEO 
REPLACE username WITH A— > username 
REPLACE jobdescr WITH ’ INSERTION’ 
REPLACE progname WITH ’ INSCREW’ 
ENDIF 

CLOSE DATABASES 
DELETE FILE reqleave. ndx 
DELETE FILE crewwernb. ndx 
RETURN 
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*** PROGRAM SCREEN 1 



CLEAR 



If* 


2,4 


SAY 


If* 


3, 4 


SAY 


0 


4,4 


SAY 


0 


5, 4 


SAY 


0 


6,4 


SAY 


0 


7,4 


SAY 


0 


fl, 4 


SAY 


0 


9,4 


SAY 


0 


10, 4 


SAY 


0 


11,4 


SAY 


0 


12, 4 


SAY 


0 


13, 4 


SAY 


0 


14, 4 


SAY 


0 


15, 4 


SAY 


0 


16, 4 


SAY 


0 


17,4 


SAY 


0 


18, 4 


SAY 


0 


19, 4 


SAY 


0 


£0, 4 


SAY 


0 


21*4 


SAY 


RETURN 
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*** PROGRAM CODESCR 



0 

0 


£, 45 
3, 45 


SAY 

SAY 

cny 




IMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM, 
: RANK CODES SPECIALIZATION 




J 


OH Y 




• 














0 


5, 45 


SAY 




: FF 1 0 


= 


CDR 




D001 


= 


DECK 


0 


6, 45 


SAY 




: FF£0 


= 


LT CDR 


D00£ 


= 


WPN USER 


0 


7, 45 


SAY 




: FF30 


= 


LT 




D003 


= 


WPN CTRL 


0 


8, 45 


SAY 




: FF40 


= 


LT JG 


D004 


= 


COMMUNIC 


0 


9, 45 


SAY 




: FF50 


= 


ENSIGN 


D005 


= 


NAVIGAT. 


0 


10, 45 


SAY 




: PF 10 


= 


M CH 


PO 


D006 


= 


RDR USER 


0 


1 1, 45 


SAY 




: PF20 


= 


S CH 


PO 


D007 


= 


SANITARY 


0 


1£, 45 


SAY 




: PF30 


= 


CH 


PO 


E001 


= 


ENGINEER 


0 


13, 45 


SAY 




: PF40 


= 


PO 1 


CL 


E00£ 


= = 


ELECTRIC 


0 


14, 45 


SAY 




: PF50 


= 


PQ 2 


CL 


E003 


= 


ELECTRON 


0 


15, 45 


SAY 




: PFS0 


= 


PO 3 


CL 








0 


16, 45 


SAY 




: SM 1 0 


= 


SEAMAN 








0 


17, 45 


SAY 




: 














0 


18, 45 


SAY 




: 














0 


19, 45 


SAY 




: 














0 


£0, 45 


SAY 




; 














0 


£1, 45 


SAY 




HMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM 



RETURN 
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*** PROGRAM MOD I CREW 



-* This program modifies records into CREWMEMB file. 



CLEAR 

STORE ’ Y’ TO ansr 
STORE . F. TO done 
USE crewrnernb 

INDEX ON SERNO TO crewmemb 
SELECT 1 
USE users 
SELECT £ 

USE spy 
SELECT 3 

USE crewmemb INDEX crewrnernb 
DO WHILE UPPER (ansr) = ’ Y’ 

STORE ’ ’ TO sno 

DO screenl 

SET COLOR TO W+ 

0 3,6 SAY ’MODIFY RECORDS (CREWMEMB FILE) ’ 

0 4,6 SAY ’==============================’ 

SET COLOR TO W 

0.20,7 SAY ’ENTER SERIAL NUMBER ==> ’ GET sno, 
PICTURE ’99993’ 

READ 

0 £0, 7 SAY ’ ’ 

FIND &sno 
IF .NOT. EOF ( ) 



rnernvars 

TO rnk 
’ TO 



* imtiali ze 
STORE ’ 

STORE ’ 

STORE ’ 

STORE ’ 

STORE ’ ’ TO 

* display choices 
STORE 
0 
0 



’ TO nrn 



odat e 



’ TO addr 



phn 



0 TO respons 



i* 

0 

0 

0 

0 

0 

0 



5, 1 1 

6 , 1 1 
7, 11 
Q, 1 1 

3 , 11 
10 , 1 1 
11,11 
12 , 1 1 
20, 7 



SAY 

SAY 

SAY 

SAY 

SAY 

SAY 

SAY 

SAY 

SAY 



FIELDS TO 3E MOD IF! 



ED’ 



PICTURE 

READ 



NAME 1’ 

RANK 2’ 

DISENROL. DATE .. S’ 

ADDRESS 4’ 

PHONE 5’ 

PHONE + ADDRESS . S’ 
’ENTER FIELD NUMBER ==> ’ 
RANGE 1,6 



GET response, 
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* clear screen 

@ 5, 8 SAY ’ » 

@ 6, 8 SAY ’ i 

@ 7, a SAY ’ » 

@ 8, 8 SAY ’ » 

@ 9, 8 SAY ’ » 

@ 10, 8 SAY ’ 1 

0 11, a SAY ’ » 

0 12,8 SAY ’ » 

0 20, 7 SAY ’ » 



DO CASE 
CASE 



CASE 



CASE 



CASE 



CASE 



CASE 



response = 1 

@5,5 SAY ’NAME GET ran 

READ 

@5,5 SAY ’ 

REPLACE name WITH ran 



response = 2 
STORE ’ ’ TO ans 

@ 20,7 SAY ’DO YOU NEED CODES? (Y/N) ==> ’ 

GET ans 

READ 

@ 20, 7 SAY ’ 

IF UPPER (ans) = » Y’ 

DO rankscr 
END IF 

@ 6, 5 SAY ’ RANK CODE : ’ GET rnk 

READ 



@ 6, 5 SAY ’ 

REPLACE rank WITH rnk 
response = 3 

@ 9,5 SAY ’ DISENRL. DATE:’ GET odate, 

PICTURE ’99/99/99’ 

READ 

@ 9, 5 SAY ’ 

REPLACE outdate WITH CTOD (odate) 
response = 4 

@ 10,5 SAY ’ADDRESS GET addr 

READ 

@ 10,5 SAY ’ 

REPLACE address WITH addr 
response = 5 

@ 11,5 SAY ’PHONE :’ GET phn 

READ 

@ 11,5 SAY ’ 

REPLACE phone WITH phn 



response = 6 
@ 10, 5 SAY ’ ADDRESS 
@ 11,5 SAY ’ PHONE 
READ 

@ 10, 5 SAY ’ 

@ 11,5 SAY ’ 



GET addr 
GET phn 



1 



1 
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REPLACE address WITH addr 
REPLACE phone WITH phr. 

ENDCASE 

STORE . T. TO done 



* 


Display 


modified record 








0 


5, 5 


SAY 


’ NAME 


f 


GET 


name 


0 


S, 5 


SAY 


’ RANK CODE 


i 


GET 


rank 


0 


7,5 


SAY 


’ SPECIALTY 


t 


GET 


spec 


0 


a, 5 


SAY 


’ ENROL. DATE 


? 


GET 


indat e 


0 


9,5 


SAY 


’ DISENRL DATE 


9 


GET 


outdate 


0 


10, 5 


SAY 


’ ADDRESS 


1 


GET 


address 


0 

ELSE 


11,5 


SAY 


’ PHONE 


1 


GET 


phone 


0 


£0, 7 


SAY 


’ RECORD DOES 


; NOT 


EXIST’ 



DO delay 

0 £0, 7 SAY ’ ’ 

ENDIF 

CLEAR GETS 

0 £0,7 SAY ’MORE MODIFICATIONS? (Y/N) ==> ’ GET ansr 
READ 
CLEAR 
ENDDQ 



* update SPY file 
IF done 

SELECT 1 
GO TOP 

LOCATE FOR password = psw 
SELECT £ 

APPEND BLANK 

REPLACE date WITH DATE ( ) 

REPLACE time WITH TIMEO 
REPLACE username WITH A— > username 
REPLACE jobdescr WITH ’MODIFICATION’ 
REPLACE prognarne WITH ’ MODICREW’ 
ENDIF 

CLOSE DATABASES 

DELETE FILE crewrnemb. ndx 

RETURN 
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*•** PROGRAM RANKSCR 



0 


£, 43 


SAY 


’ IMMMMMMMMMMMMMMMMMMMMMMMMMMMMM, 


ip 


3, 48 


SAY 


1 


RANK CODES 


0 


4, 48 


SAY 








(p 


5, 48 


SAY 




CODE 


DESCRIPTION 


0 


6, 48 


SAY 




— 




0 


7, 48 


SAY 




FFIO 


COMMANDER 


0 


a, 48 


SAY 




FF20 


LT COMMANDER 


0 


9, 48 


SAY 


5 


FF30 


LIEUTENANT 


0 


10, 48 


SAY 




FF40 


LIEUTENANT JG 


0 


11, 48 


SAY 


1 


FF50 


ENSIGN 


0 


12, 48 


SAY 




PF 10 


MASTER CHIEF PO 


0 


13, 48 


SAY 


* 


PF20 


SENIOR CHIEF PO 


0 


14, 48 


SAY 




PF30 


CHIEF PO 


0 


15, 48 


SAY 




PF40 


PO 1st CLASS 


0 


16, 48 


SAY 




PF50 


PO 2nd CLASS 


0 


17, 48 


SAY 




PF60 


PO 3nd CLASS 


0 


18, 48 


SAY 


? 


SMI 0 


SEAMAN 


0 


19, 43 


SAY 








0 


20, 48 


SAY 


1 






0 


21, 48 


SAY 


’ HMMMMMMMMMMMMMMMMMMMMMMMMMMMMM 



RETURN 
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*** PROGRAM MODLEAVE 



*- This program modifies records into REQLEAVE file. 



CLEAR 

STORE ’ Y’ TO ansr 
STORE . F. TO done 
USE req leave 

INDEX ON SERNO TO req leave 

SELECT 1 

USE users 

SELECT 2 

USE spy 

SELECT 3 

USE req leave INDEX req leave 
DO WHILE UPPER (ansr) = ’ Y’ 

STORE ’ 1 TO sno 

DO screen 1 

SET COLOR TO W+ 

0 3,8 SAY ’ MODIFY RECORDS ( REQLEAVE FILE) ’ 

0 4,8 SAY ’ ============================== ’ 

SET COLOR TO W 

0,20,7 SAY ’ ENTER SERIAL NUMBER ==> ’ GET sno, 
PICTURE ’99999’ 

READ 

0 20, 7 SAY ’ ’ 

FIND &sno 
IF .NOT. EOF ( ) 



* initialize rnemvars 
STORE ’ ’ TO req 1 , 

STORE 0 TO dur 1 , dur2 



reqd 



* display choices 
STORE 0 TO response 

@ 5,11 SAY ’FIELDS TO BE MODIFIED’ 


0 


6, 1 1 


SAY 


i 


1 


0 


7, 11 


SAY 


’ REQUEST 1 


1’ 


0 


8, 1 1 


SAY 


’ REQ1DUR 


“■ 1 
1 


0 


9, 11 


SAY 


’ REQUEST2 


3’ 


0 


10, 11 


SAY 


’ REQ2DUR 


4’ 


0 


11,11 


SAY 


’ REQUEST 1 + DURATION 


5’ 


0 


12, 11 


SAY 


’ REQUEST2 + DURATION 


6’ 


0 


£0, 7 


SAY 


’ENTER FIELD NUMBER = 


==> 


P 


ICTURE 


’ 9’ 


RANGE 1,6 





GET response, 



READ 
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* clear screen 

© 5, a SAY ’ > 

© S, 3 SAY ’ » 

© 7, 3 SAY ’ » 

© 3, a SAY ’ > 

© 9, a SAY ’ > 

© 10, a SAY ’ » 

© 1 1 , a SAY ’ » 

© 12, a SAY ’ » 

© 20, 7 SAY ’ » 

DO CASE 

CASE response = 1 

©5,5 SAY ’ REQUEST 1 BET reql , 

PICTURE ’99/99/99’ 

READ 

© 5, 5 SAY ’ 

REPLACE request 1 WITH CTOD(reql) 

CASE response = 2 

© £, 5 SAY ’ REQ1DUR :’ BET durl , 

PICTURE ’99’ 

READ 

© &, 5 SAY ’ 

REPLACE reqldur WITH durl 
CASE response = 3 

© 9,5 SAY ’ REQUEST2 : ’ BET req2 , 

PICTURE ’99/99/99’ 

READ 

© 9, 5 SAY ’ 

REPLACE requests WITH CT0D(req2) 

CASE response = 4 

© 10,5 SAY ’ REQ2DUR :’ BET dur2 , 

PICTURE ’99’ 

READ 

© 10,5 SAY ’ 

REPLACE req2dur WITH dur2 
CASE response = 5 

© 11,5 SAY ’ REQUEST 1 :’ SET reql , 

PICTURE ’99/99/99/’ 

© 12,5 SAY ’ DURATION1 :’ BET durl , 

PICTURE ’99’ 

READ 

© 11,5 SAY ’ 

© 12,5 SAY ’ 

REPLACE request 1 WITH CTOD(reql) 
REPLACE reqldur WITH durl 
CASE response = a 

© 13,5 SAY ’ REQUEST2 :’ BET req2 , 

PICTURE ’99/99/99’ 

© 14,5 SAY ’ DURATI0N2 :’ SET dur2 , 
PICTURE ’99’ 

READ 
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1 



0 13,5 SAY ’ 

0 14, 5 SAY ’ 

REPLACE requests WITH CTOD(reqS) 
REPLACE reqSdur WITH dur£ 

ENDCASE 

STORE . T. TO done 
* Display modified record 



0 


5, 9 


SAY 


’SERIAL NUMBER 


’ GET 


serrio 


0 


6,9 


SAY 


’ REMAINING LEAVE 


’ GET 


rern leave 


0 


7,9 


SAY 


’ REQUEST 1 


’ GET 


request 1 


0 


8,9 


SAY 


’ REQUEST 1 DURATION 


’ GET 


reqldur 


0 


9,9 


SAY 


’ REQUESTS 


’ GET 


requests: 


0 

ELSE 


10, 9 


SAY 


’ REQUESTS DURATION 


’ GET 


reqcdur 


0 

DO 


£0, 7 SAY 
delay 


’ RECORD DOES NOT EXIST’ 


0 


£0, 7 


SAY 









END IF 

CLEAR GETS 



0 £0,7 SAY ’MORE MODIFICATIONS? (Y/N) ==> ’ GET ansr 
READ 
CLEAR 
ENDDO 

* update SPY file 
IF done 

SELECT 1 
GO TOP 

LOCATE FOR password = psw 
SELECT £ 

APPEND BLANK 

REPLACE date WITH DATE O 

REPLACE time WITH TIMEO 

REPLACE username WITH A— > username 

REPLACE jobdescr WITH ’MODIFICATION’ 

REPLACE progname WITH ’ REQLEAVE’ 

END IF 

CLOSE DATABASES 

DELETE FILE reqleave. ndx 

RETURN 
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*** PROGRAM DELECREW 



* This program deletes records from CREWMEMB rile, 

* as well as from REQLEAVE file. 

CLEAR 

STORE ’ Y’ TO ansr 
STORE . F. TO done 
USE crewmemb 

INDEX ON SERNO TO crewmemb 
USE req leave 

INDEX ON SERNO TO reqleave 
SELECT 1 
USE users 
SELECT £ 

USE spy 
SELECT 3 

USE reqleave INDEX reqleave 
SELECT 4 
USE statist 
SELECT 5 

USE crewmemb INDEX crewmemb 

DO WHILE UPPER (ansr) = ’ Y’ 

CLEAR 

DO screenl 
SET COLOR TO W+ 

0 3, 9 SAY ’ DELETE RECORD FROM CREWMEMB’ 

0 4,9 SAY ’ ===========================’ 

SET COLOR TO W 
STORE ’ ’ TO sno 

0 20,7 SAY ’ENTER SERIAL NUMBER ==> ’ GET sno , 
PICTURE ’99999’ 

READ 

0 20, 7 SAY ’ ’ 

FIND &sno 
IF .NOT. EOF ( ) 



Id 


5, 5 


SAY 


’ NAME 




GET 


name 


0 


£>, 5 


SAY 


’ RANK CODE 




GET 


rank 


0 


7,5 


SAY 


’ SPEC- CODE 




GET 


spec 


0 


8, 5 


SAY 


’ ENROL. DATE 


i 


GET 


i ndate 


0 


9, 5 


SAY 


» DISENRL. DATE 


* 


GET 


out date 


0 


9,5 


SAY 


’ ADDRESS 




GET 


address 


0 


10, 5 


SAY 


» PHONE 


i 


GET 


phone 



STORE ’ ’ TO ans 

CLEAR GETS 

0 20,7 SAY ’DELETE? (Y/N) ==> ’ GET ans 

READ 
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’ Y’ 



IF UPPER (ar.s) = 
SELECT 4 
APPEND BLANK 



REPLACE 


serno 


WITH 


E— > serno 


REPLACE 


name 


WITH 


E—> name 


REPLACE 


rank 


WITH 


E— > rank 


REPLACE 


spec 


WITH 


E— > spec 


REPLACE 


indate 


WITH 


E— > indate 


REPLACE 


outdate 


WITH 


DATEO 



SELECT 5 
DELETE 

STORE . T. TO done 

SELECT 3 
FIND &snc 
IF .NOT. EOF ( ) 

SET COLOR TO W+ 

® IE, 9 SAY ’DELETE RECORD FROM REQLEAVE’ 
SET COLOR TO W 



0 


14, 5 


SAY 


1 


REMAINING 


LEAVE 




GET 


reml eave 


0 


15, 5 


SAY 


* 


1st 


LEAVE 


REQUEST 




GET 


request 1 


0 


16, 5 


SAY 




1st 


LEAVE 


DURATION 




GET 


req 1 dur 


0 


17, 5 


SAY 


* 


End 


LEAVE 


REQUEST 




GET 


request E 


0 


18, 5 


SAY 


* 


End 


LEAVE 


DURATION 




GET 


req Ed ur 



CLEAR GETS 
END IF 
ENDIF 
ELSE 

® £0,7 SAY ’RECORD DOES NOT EXIST’ 

DO delay 

® £0, 7 SAY ’ ’ 

ENDIF 

@ £0,7 SAY ’MORE DELETIONS? (Y/N) ==> ’ GET ansr 
READ 

SELECT 5 
ENDDO 

IF done 

SELECT 5 
PACK 

SELECT 4 
PACK 
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psw 



* update SPY file 
SELECT 1 
GO TOP 

LOCATE FOR password — 

SELECT £ 

APPEND BLANK 
REPLACE date WITH DATE ( ) 

REPLACE time WITH TIMEO 
REPLACE username WITH A— > username 
REPLACE jobdeser WITH ’ DELETION’ 
REPLACE prognarne WITH ’ DELECREW’ 
END IF 

CLOSE DATABASES 
DELETE FILE erewmemb. ndx 
DELETE FILE reqleave. ndx 
RETURN 
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C. PROGRAMS SUPPORTING THE CREW ALLOCATION 



*** PROGRAM ALLOCATE 

* This program allocate the ship crew into £ or 3 

* and performs the ship manning according to alert 



CLEAR 

STORE ’ ’ TO allcont 

PUBLIC allcode 
DO WHILE UPPER (allcont) 
DO submenu£ 



DO CASE 






CASE 


allcode = 


0 




STORE ’ N’ 


TO 


CASE 


allcode = 


1 




DO genaler 


‘t 


CASE 


allcode = 


S 




DO surfalert 


CASE 


allcode = 


3 




DO airalert 


CASE 


allcode = 
DO shifts 


4 


CASE 


all code = 
DO shifts 


5 


ENDCASE 







ENDDO 

RETURN 



N’ 



all cent 



shifts 

type. 
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*-*-* PROGRAM SUBMENUS 



CLEAR 

PUBLIC allcode 



STORE 


0 


TO 


al Icode 








0 


7, 


14 


SAY 


’ I MMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM 


7 


0 


a, 


14 


SAY 


7 




SUBMENU £ 




. 7 


0 




14 


SAY 


7 




MMMMMMMMM 




. 7 


0 


10, 


14 


SAY 


7 








. 7 


0 


ii, 


14 


SAY 


7 


EXIT 


TO MAIN MENU 


. . . 0 


. 7 


0 


12, 


14 


SAY 


7 


CREW 


ALLOCATION FOR GENERAL ALERT ... 


. . . 1 


. 7 


0 


13, 


14 


SAY 


7 


CREW 


ALLOCATION FOR SURFACE ALERT . . . 


. . . £ 


- 7 


0 


14, 


14 


SAY 


7 


CREW 


ALLOCATION FOR AIR ALERT 




. 7 


0 


15, 


14 


SAY 


7 


CREW 


ALLOCATION INTO £ SHIFTS 


4 


. 7 


0 


16, 


14 


SAY 


7 


CREW 


ALLOCATION INTO 3 SHIFTS 




. 7 


0 


17, 


14 


SAY 


’ HMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM <’ 



SET COLOR TO W+ 

& 19, £6 SAY ’ENTER YOUR SELECTION ==> ’ , 

GET allcode PICTURE ’9’ RANGE 0,5 

READ 

SET COLOR TO W 
RETURN 
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*** PROGRAM GENALERT 



* This program performs the ship manning for general alert 
CLEAR 

DO screens 

£ 9,29 SAY ’AUXILIARY FILE CREATION’ 

COPY FILE crewmemb. dbf TO t mpcrew.. d bf 
0 11, £9 SAY ’ TMPCREW’ 

COPY FILE alert. dbf TO tmpalert.dbf 
0 12,29 SAY ’ TMPALERT’ 



* open required files 
SELECT 1 
USE users 
SELECT £ 

USE spy 
SELECT 3 
USE gal ert 
DELETE NEXT 100 
PACK 

SELECT 4 
USE tinpcrew 
SELECT 5 
USE trnpalert 
STORE .F. TO finish 
STORE . T. TO done 
0 9, 25 SAY ’ 

0 10,25 SAY ’ ’ 

0 11, £5 SAY ’ ’ 

SET COLOR TO W* 

0 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
DO WHILE .NOT. EOF ( ) 

STORE . F. TO ok 
SELECT 4 
GO TOP 

LOCATE FOR rank = E— > reqrank .AND. spec = E— > reqspec , 
.AND. .NOT. DELETED () 

IF .NOT. EOF ( ) 

DELETE 
SELECT 3 
APPEND BLANK 

REPLACE rank WITH D-> rank 
REPLACE name WITH D-> name 
REPLACE spec WITH D— > spec 
REPLACE poscode WITH E— > poscode 
REPLACE descr WITH E-> descr 
STORE . T. TO ok 
ELSE 

STORE . F. TO done 
ENDIF 
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SELECT 5 
IF ok 

DELETE 
END IF 
SKIP 
ENDDO 

© 12, £5 SPY ’ ’ 

* 

IF . NOT. done 

STORE ’ ’ TO ansr 

© 19,26 CLEAR 

© 19,26 SPY ’SOME POSITIONS REMAIN UNMANNED’ 

© £0, 26 SAY ’ DUE TO NOT EXACT MATCH OF THE’ 

© £1,26 SAY ’ RANK OR SPECIALTY’ 

© 23,23 SAY ’IGNORE RANK AND CONTINUE? (Y/N) ==> ’ GET ansr 

READ 

© 19,23 CLEAR 
IF UPPER (ansr) = ’ Y’ 

SELECT 5 
GO TOP 

STORE . T. TO done 
SET COLOR TO W* 

© 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
DO WHILE .NOT. EOF ( ) 

STORE . F. TO ok 
IF .NOT. DELETED () 

SELECT 4 
GO TOP 

LOCATE FOR spec = E-> reqspec .AND. .NOT. DELETED < ) 
IF .NOT. EOF ( ) 

DELETE 
SELECT 3 
APPEND BLANK 

REPLACE rank WITH D->rank 
REPLACE name WITH D-> name 
REPLACE spec WITH D-> spec 
REPLACE poscode WITH E-> poscode 
REPLACE descr WITH E-> descr 
STORE . T. TO ok 
ELSE 

STORE . F. TO done 
END IF 
END IF 
SELECT 5 
IF ok 

DELETE 
END IF 
SKIP 
ENDDO 

© 12,25 SAY ’ ’ 
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ELSE 

STORE . T. TO finish 
END IF 
END IF 
* 

IF .NOT. finish 
IF .NOT. done 

STORE ’ ’ TO ansr 

© 19,23 CLEAR 

© 19,23 SAY ’SOME POSITIONS STILL REMAIN UNMANNED’ 
© 20,23 SAY ’DUE TO NOT EXACT MATCH OF THE FIELD’ 
© 21,23 SAY ’ SPECIALTY’ 

© 23,23 SAY ’IGNORE SPECIALTY AND CONTINUE? (Y/N) 

GET ansr 

READ 

© 19, 23 CLEAR 
IF UPPER (ansr) = ’ Y’ 

STORE . T. TO done 
SET COLOR TO W* 

© 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
SELECT 5 
GO TOP 

DO WHILE .NOT. EOF ( ) 

STORE . F. TO ok 
IF .NOT. DELETED () 

SELECT 4 
GO TOP 

LOCATE FOR .NOT. DELETED ( ) 

IF .NOT. EOF ( ) 

DELETE 
SELECT 3 
APPEND BLANK 

REPLACE rank WITH D-> rank 
REPLACE name WITH D— > name 
REPLACE spec WITH D— > spec 
REPLACE poseode WITH E— > poscode 
REPLACE deser WITH E-> deser 



STORE .T. 


TO 


ok 


ELSE 






STORE .F. 


TO 


done 



END IF 
END IF 
SELECT 5 
IF ok 

DELETE 
END IF 
SKIP 
ENDDO 

© 12,25 SAY ’ 
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ELSE 

STORE . T. TO finish 
END IF 
END IF 
ENDIF 
* 

SELECT 4 

LOCATE FOR .NOT- DELETED ( ) 

IF .NOT. EOF ( ) 

STORE ’ ’ TO ansr 

@ 19,23 CLEAR 

0 19,23 SAY ’ THERE IS STILL AVAILABLE PERSONNEL’ 
0 20,23 SAY ’DO YOU WANT TO SEE THEM? (Y/N) ==> ’ 
READ 

IF UPPER (ansr) = ’ Y’ 

CLEAR 
GO TOP 

LOCATE FOR .NOT. DELETED ( ) 

DO WHILE -NOT. EOF ( ) 

DISPLAY serno, name, rank, spec FOR .NOT. 
DO delayl 
CONTINUE 
ENDDO 
ENDIF 
ENDIF 

* update SPY file 
SELECT 1 
GO TOP 

LOCATE FOR password = psw 
SELECT 2 
APPEND BLANK 
REPLACE date WITH DATE < ) 

REPLACE time WITH TIMEO 

REPLACE username WITH A-> username 

REPLACE jobdescr WITH ’ALLOCATION’ 

REPLACE prognarne WITH ’ GENALERT’ 

CLOSE DATABASES 
DELETE FILE trnpcrew. dbf 
DELETE FILE tmpalert. dbf 
RETURN 



GET ansr 



DELETED < ) 



10 3 



*-** PROGRAM 3URFALERT 



* This program performs the ship manning for surface alert 



CLEAR 

DO screenE 



@ 9,29 SAY ’AUXILIARY FILE CREATION’ 

COPY FILE crewrnernb. dbf TO trnpcrew. dbf 
0 11,29 SAY ’ TMPC RE W’ 

COPY FILE alert, dbf TO trnpalert.dbf 

* delete the positions that are not necessary to be manned 



USE tmpalert 
DELETE FOR UPPER (descr) 
DELETE FOR UPPER (descr) 
DELETE FOR UPPER (descr) 
DELETE FOR UPPER (descr) 
DELETE FOR UPPER (descr) 
DELETE FOR UPPER (descr) 
PACK 



’GUN 41 CONTROL’ 

’ GUN 42 CONTROL’ 
’A/A MISS CONTR’ 
’A/A MISS TELEPH’ 
’ A/A MISSILES 1’ 
’A/A MISSILES 2’ 



0 12,29 SAY ’ TMPALERT’ 



* open required files 

SELECT 1 

USE users 

SELECT 2 

USE spy 

SELECT 3 

USE sa 1 er t 

DELETE NEXT 100 

PACK 

SELECT 4 
USE trnpcrew 
SELECT 5 
USE tmpalert 
STORE .F. TO finish 
STORE . T. TO done 

0 9, 25 SAY ’ ’ 

0 10,25 SAY ’ ’ 

0 1 1 , 25 SAY ’ ’ 

SET COLOR TO W* 

0 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
DO WHILE .NOT. EOF ( ) 

STORE -F. TO ok 
SELECT 4 
GO TOP 

LOCATE FOR rank = E-> reqrank .AND. spec = E— > reqspec , 
• AND. .NOT. DELETED () 
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IF .NOT. EOF ( ) 

DELETE 
SELECT 3 
APPEND BLANK 

REPLACE rank WITH D-> rank 
REPLACE name WITH D— > name 
REPLACE spec WITH D— > spec 
REPLACE poscode WITH E-> poscode 
REPLACE descr WITH E-> descr 
STORE . T. TO ok 
ELSE 

STORE . F. TO done 
END IF 
SELECT 5 
IF ok 

DELETE 
END IF 
SKIP 
ENDDO 

0 12, £5 SAY ’ ’ 

IF .NOT. done 

STORE ’ ’ TO ansr 

0,19, £6 CLEAR 

0 19, £6 SAY ’SOME POSITIONS REMAIN UNMANNED’ 

0 £0, £6 SAY ’ DUE TO NOT EXACT MATCH OF THE’ 

0 £ 1 , £6 SAY ’ RANK OR SPECIALTY’ 

0 £3, £3 SAY ’IGNORE RANK AND CONTINUE? (Y/N) ==> ’ GET ansr 

READ 

0 19, £3 CLEAR 
IF UPPER (ansr) = ’ Y’ 

SELECT 5 
GO TOP 

STORE . T. TO done 
SET COLOR TO W* 

0 1£, £5 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
DO WHILE .NOT. EOF ( ) 

STORE . F. TO ok 
IF .NOT. DELETED () 

SELECT 4 
GO TOP 

LOCATE FOR spec = E— > reqspec .AND. .NOT. DELETED 1 ,) 
IF .NOT. EOF ( ) 

DELETE 
SELECT 3 
APPEND BLANK 

REPLACE rank WITH D-> rank 
REPLACE name WITH D— > name 
REPLACE spec WITH D-> spec 
REPLACE poscode WITH E-> poscode 
REPLACE descr WITH E-> descr 
STORE .T. TO ok 
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ELSE 

STORE .F. TO done 
ENDIF 
END IF 
SELECT 5 
IF ok 

DELETE 

ENDIF 

SKIP 

ENDDO 

0 12, £5 SPY ’ ’ 

ELSE 

STORE . T. TO finish 
ENDIF 
ENDIF 
* 

IF .NOT. finish 
IF .NOT. done 

STORE ’ ’ TO ansr 

0 19,23 CLEAR 

0 19,23 SPY ’SOME POSITIONS STILL REMAIN UNMANNED 
0 £0,23 SAY ’DUE TO NOT EXACT MATCH OF THE FIELD 
. 0 21,23 SAY ’ SPECIALTY’ 

0 23,23 SAY ’IGNORE SPECIALTY AND CONTINUE? (Y/N) 
GET ansn 

READ 

0 19,23 CLEAR 
IF UPPER (ansr) = ’ Y’ 

STORE . T. TO done 
SET COLOR TO W* 

0 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
SELECT 5 
GO TOP 

DO WHILE .NOT. EOF ( ) 

STORE .F. TO ok 
IF .NOT. DELETED () 

SELECT 4 
GO TOP 

LOCATE FOR .NOT. DELETED ( ) 

IF .NOT. EOF ( ) 

DELETE 
SELECT 3 
APPEND BLANK 

REPLACE rank WITH D-> rank 
REPLACE name WITH D— > name 
REPLACE spec WITH D— > spec 
REPLACE poscode WITH E— > poscode 
REPLACE descr WITH E->descr 
STORE .T. TO ok 
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ELSE 

STORE . F. TO done 
END IF 
END IF 
SELECT 5 
IF ok 

DELETE 
END IF 
SKIP 
ENDDO 

£ 1£, £5 SOY ’ ’ 

ELSE 

STORE . T. TO finish 
END IF 
END IF 
ENDIF 
* 

SELECT A 

LOCATE FOR . NOT. DELETED < ) 

IF .NOT. EOF < ) 

STORE ’ ’ TO ansr 

@ 19, £3 CLEAR 

©..19,23 SOY ’THERE IS STILL AVAILABLE PERSONNEL’ 
© £0, £3 SAY ’DO YOU WONT TO SEE THEM? (Y/N) ==> ’ 
READ 

IF UPPER (ansr) = ’ Y’ 

CLEAR 
60 TOP 

LOCATE FOR .NOT. DELETED ( ) 

DO WHILE .NOT. EOF ( ) 

DISPLAY serno, name, rank, spec FOR . NOT. 
DO delayl 
CONTINUE 
ENDDO 
ENDIF 
ENDIF 

* update SPY file 
SELECT 1 
GO TOP 

LOCATE FOR password = psw 
SELECT £ 

APPEND BLANK 

REPLACE date WITH DATE ( ) 

REPLACE time WITH TIMEO 

REPLACE username WITH A— > username 

REPLACE jobdescr WITH ’ALLOCATION’ 

REPLACE progname WITH ’ SURFOLERT’ 

CLOSE DATABASES 
DELETE FILE trnpcrew. dbf 
DELETE FILE tmpalert.dbf 
RETURN 



GET ans 



DELETED ( 
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*** PROGRAM AIRALERT 



* This program performs the ship manning for air alert 



CLfc.AR 

DO screens 



0 9, £9 SAY ’AUXILIARY FILE CREATION’ 

COPY FILE crewmernb. dbf TO tmpcrew. dbf 
0 11, £9 SAY ’ TMPCREW’ 

COPY FILE alert, dbf TO trnpalert . dbf 

* delete the positions that are not necessary to be manned 



USE trnpalert 
DELETE FOR UPPER (descr) 
DELETE FOR UPPER (descr) 
DELETE FOR UPPER (descr) 
DELETE FOR UPPER (descr) 
DELETE FOR UPPER (descr) 
DELETE FOR UPPER (descr) 
PACK 



’TORPEDO TUBE 1’ 
’ TORPEDO TUBE £’ 
’SS MISS CONTR’ 

’ SS MISS TELEPH’ 
’SS MISSILES 1’ 
’SS MISSILES £’ 



0 12, 2S SAY ’ TMPALERT’ 



* open required files 
SELECT 1 
USE users 
SELECT £ 

USE spy 
SELECT 3 
USE aalert 
DELETE NEXT im 
PACK 

SELECT 4 
USE tmpcrew 
SELECT 5 
USE trnpalert 
STORE .F. TO finish 
STORE . T. TO done 

0 9, £5 SAY ’ ’ 

0 U3, £5 SAY ’ ’ 

0 1 1 , £5 SAY ’ ’ 

SET COLOR TO W* 

0 1£, £5 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
DO WHILE .NOT. EOF ( ) 

STORE -F. TO ok 
SELECT 4 
GO TOP 

LOCATE FOR rank = E— > reqrank .AND. spec = E— > reqspec , 
.AND. .NOT. DELETED () 
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IF .NOT. EOF ( ) 

DELETE 
SELECT 3 
APPEND BLANK 

REPLACE rank WITH D-> rank 
REPLACE name WITH D— > name 
REPLACE spec WITH D-> spec 
REPLACE poscode WITH E— > poscode 
REPLACE descr WITH E-> descr 



STORE .T. 


TO 


ok 


ELSE 






STORE . F. 


TO 


done 



ENDIF 
SELECT 5 
IF ok 

DELETE 

ENDIF 

SKIP 

ENDDO 

0 12, £5 SAY ’ ’ 

IF .NOT. done 

STORE ’ ’ TO ansr 

0.19,26 CLEAR 

0 19,26 SAY ’SOME POSITIONS REMAIN UNMANNED’ 

0 20, 26 SAY ’ DUE TO NOT EXACT MATCH OF THE’ 

0 21,26 SAY ’ RANK OR SPECIALTY’ 

0 23,23 SAY ’IGNORE RANK AND CONTINUE? (Y/N) ==> ’ GET ansr 

READ 

0 19,23 CLEAR 
IF UPPER (ansr) = ’ Y’ 

SELECT 5 
GO TOP 

STORE . T. TO done 
SET COLOR TO W* 

0 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
DO WHILE .NOT. EOF ( ) 

STORE .F. TO ok 
IF .NOT. DELETED () 

SELECT 4 
GO TOP 

LOCATE FOR spec = E-> reqspec .AND. .NOT. DELETED C > 
IF .NOT. EOF ( ) 

DELETE 
SELECT 3 
APPEND BLANK 

REPLACE rank WITH D-> y-^rtk 
REPLACE name WITH D-> name 
REPLACE spec WITH D-> spec 
REPLACE poscode WITH E— > poscode 
REPLACE descr WITH E-> descr 
STORE . T. TO ok 



10.9 



ELSE 

STORE . F. TO done 
END IF 
END IF 
SELECT 5 
IF ok 

DELETE 
END IF 
SKIP 
ENDDO 

0 IS, £5 SAY ’ ’ 

ELSE 

STORE . T. TO finish 
END IF 
END IF 
* 

IF .NOT. finish 
IF .NOT. done 

STORE ’ ’ TO ar.sr 

© IS, S3 CLEAR 

0 19, S3 SAY ’SOME POSITIONS STILL REMAIN UNMANNED’ 
0 SO, S3 SAY ’DUE TO NOT EXACT MATCH OF THE FIELD’ 
.. 0 SI, S3 SAY ’ SPECIALTY’ 

0 S3, S3 SAY ’IGNORE SPECIALTY AND CONTINUE? (Y/N) 

GET ansr 

READ 

0 19, S3 CLEAR 
IF UPPER (ar.sr) = ’ Y’ 

STORE . T. TO done 
SET COLOR TO W* 

0 IS, £5 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
SELECT 5 
GO TOP 

DO WHILE .NOT. EOF ( ) 

STORE .F. TO ok 
IF .NOT. DELETED () 

SELECT 4 
GO TOP 

LOCATE FOR .NOT. DELETED ( ) 

IF .NOT. EOF ( ) 

DELETE 
SELECT 3 
APPEND BLANK 

REPLACE rank WITH D-> rank 
REPLACE name WITH D-> name 
REPLACE spec WITH D-> spec 
REPLACE poscode WITH E— > poscode 
REPLACE descr WITH E->descr 
STORE . T. TO ok 
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ELSE 

STORE . F. TO done 
END IF 
END IF 
SELECT 5 
IF ok 

DELETE 
END IF 
SK I P 
ENDDO 

© 12,25 SPY ’ ’ 

ELSE 

STORE .T. TO finish 
END IF 
END IF 
END IF 
* 

SELECT 4 

LOCATE FOR . NOT. DELETED ( ) 

IF .NOT. EOF ( ) 

STORE ’ ’ TO ar.sr 

© 19,23 CLEAR 

©..19,23 SAY ’THERE IS STILL AVAILABLE PERSONNEL’ 
© 20,23 SAY ’DO YOU WANT TO SEE THEM? CY/N) ==> ’ 
READ 

IF UPPER (ansr) = ’ Y’ 

CLEAR 
GO TOP 

LOCATE FOR . NOT. DELETED ( ) 

DO WHILE .NOT. EOF ( ) 

DISPLAY serno, name, rank, spec FOR . NOT. 
DO delayl 
CONTINUE 
ENDDO 
END IF 
END IF 

* update SPY file 
SELECT 1 
GO TOP 

LOCATE FOR password = psw 
SELECT 2 
APPEND BLANK 
REPLACE date WITH DATE ( ) 

REPLACE time WITH TIMEO 

REPLACE username WITH A— > username 

REPLACE jobdescr WITH ’ALLOCATION’ 

REPLACE progname WITH ’ AI RALERT’ 

CLOSE DATABASES 
DELETE FILE trnpcrew. dbf 
DELETE FILE tmpalert.dbf 
RETURN 



GET ansr 



DELETED ( > 
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*-*-* PROGRAM SCREENS 



0 


8, £4 


SAY 


0 


3, £4 


SAY- 


0 


10, £4 


SAY 


0 


i 1 , £4 


SAY 


0 


1 £, £4 


SAY 


0 


13, £4 


SAY 


0 


14, £4 


SAY 


0 


15, £4 


SAY 


0 


16, £4 


SAY 


0 


17, £4 


SAY 


RETURN 





IMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM, 
: MMMMMMMMMMMMMMMMMMMMMMMMMM 



HMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM < 



*-** PROGRAM DELAY 1 

STORE 0 TO d 
DO WHILE d < 10 

STORE d + 1 TO d 
ENDDQ 
RETURN 
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*** PROGRAM SHIFTS 



* 

* 



This program performs the crew allocation 
. into two shifts 



CLEAR 

DO screens 

0 9,29 SAY ’AUXILIARY FILE CREATION’ 

COPY FILE crewrnemb. dbf TO trnpshift. dbf 
USE trnpshift 

INDEX ON SPEC+RANK TO trnpshift 
0 11,29 SAY ’ TMPSHIFT’ 



* open the required files 

SELECT 1 

USE users 

SELECT 2 

USE spy 

SELECT 3 

USE shift 2a 

DELETE NEXT 100 

PACK 

SELECT 4 
USE sh i ft 2b 
DELETE NEXT 100 
PACK 

SELECT 5 

USE trnpshift INDEX trnpshift 
0 9, 25 SAY ’ 

0 10,25 SAY ’ 

0 1 1 ,25 SAY ’ 

SET COLOR TO W* 

0 12,25 SAY ’ PROCESSING IN PROGRESS’ 

STORE 0 TO countl 
STORE 0 TO count2 



STORE - T. TO contin 
SET COLOR TO W 
SELECT 5 
GO TOP 

DO WHILE contin 
IF EOF ( ) 

STORE . F. TO 
ELSE 

SELECT 3 
APPEND BLANK 
REPLACE rank 
REPLACE name 
REPLACE spec 
STORE countl 
SELECT 5 
SKIP 



cont in 



WITH E— > rank 
WITH E— > name 
WITH E— > spec 
+ 1 TO count 1 






7 
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cont in 



IF EOF ( ) 

STORE . F. TO 
ELSE 

-SELECT 4 
APPEND BLANK 
REPLACE rank WITH E-> rank 
REPLACE name WITH E— > name 
REPLACE spec WITH E— > spec 
STORE counts + 1 TO counts 
SELECT 5 
SKIP 
ENDIF 
END IF 
ENDDO 
CLEAR 

STORE ’ ’ TO ans 

0 19,23 SAY ’THE TWO SHIFTS ARE READY’ 

0 20,23 SAY ’DO YOU WANT TO SEE THEM? (Y/N) ==> ’ GET ans 
READ 

IF UPPER (ans) = ’ Y’ 

STORE . F. TO fin 
STORE 0 TO ch 
DQ WHILE . NOT. fin 
DO screen2 

0 9,34 SAY ’YOUR CHOICE :’ 



0 12,30 SAY ’SHIFT A 1’ 

0 13,30 SAY ’SHIFT B 2’ 

0 14,30 SAY ’SHIFT A AND B ... 3’' 

0 15,30 SAY ’EXIT 4’ 

0 18, 10 CLEAR 

0 20,28 SAY ’ENTER YOUR CHOICE ==> ’ GET ch , 



PICTURE ’9’ RANGE 1,4 

READ 

DO CASE 

CASE ch = 1 
CLEAR 
SELECT 3 
GO TOP 

DO WHILE .NOT. EOF ( ) 

DISPLAY rank, name, spec 
DO delayl 
SKIP 
ENDDO 

CASE ch = 2 
CLEAR 
SELECT 4 
GO TOP 

DO WHILE .NOT. EOF ( ) 

DISPLAY rank, name, spec 
DO delayl 
SKIP 
ENDDO 
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CfibE ch = 3 
CLEAR 
SELECT 3 
GO TOP 

DO WHILE .NOT. EOF ( ) 

DISPLAY rank, name, spec 
DO delayl 
SKIP 
ENDDO 



CLEAR 
SELECT 4 
GO TOP 

DO WHILE .NOT. EOF ( ) 

DISPLAY rank, name, spec 
DO delayl 
SKIP 
ENDDO 

CASE ch = 4 



STORE .T. TO fin 



ENDCASE 

CLEAR 

IF .NOT. fin 

STORE ’ ’ TO res 

@ £0, IQ SAY ’ DO 
0 £1, 18 SAY ’ 
READ 

IF UPPER (res) # 
STORE . T. TO 
END IF 
END IF 
ENDDO 
ENDIF 



YOU WANT TO SEE ANY ONE OF THE’ 

SHIFTS AGAIN? (Y/N) ==> ’ GET 



i Y ’ 

fin 



res 



* update SPY file 
SELECT 1 
GO TOP 

LOCATE FOR password = psw 
SELECT £ 

APPEND BLANK 

REPLACE date WITH DATE ( ) 

REPLACE time WITH TIMEO 
REP'LACE username WITH A— > username 
REPLACE jobdescr WITH ' ALLOCATION’ 
REPLACE progname WITH ’SHIFTS’ 

CLEAR 

CLOSE DATABASES 
DELETE FILE tmpshift.dbf 
DELETE FILE tmpshift.ndx 
RETURN 
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*** PROGRAM SHIFTS 

*■ This program performs the crew allocation 
-* into three shifts 

CLEAR 

DO screens 

© 9,29 SAY ’AUXILIARY FILE CREATION’ 

COPY FILE crewmemb. dbf TO trnpsh i ft . dbf 
USE trnpsh i ft 

INDEX ON SPEC+RANK TO trnpsh i ft 
0 11,29 SAY ’ TMPSHIFT’ 

* open the required files 

SELECT 1 

USE users 

SELECT 2 

USE spy 

SELECT 3 

USE shift 3a 

DELETE NEXT 100 

PACK 

SELECT 4 
USE sh i ft 3b 
DELETE NEXT 100 
PACK 

SELECT 5 
USE shift 3c 
DELETE NEXT 100 
PACK 

SELECT 6 

USE trnpsh i ft INDEX trnpsh i ft 

0 9, 25 SAY ’ ’ 

0 10,25 SAY ’ ’ 

0 1 1 , 25 SAY ’ ’ 

SET COLOR TO W* 

0 12,25 SAY ’ PROCESSING IN PROGRESS’ 

STORE O TO count 1 
STORE O TO count2 
STORE O TO counts 
STORE -T. TO contir. 

SET COLOR TO W 
SELECT 6 
GO TOP 
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cont i n 



DO WHILfc. coritiri 
IF EOF ( ) 

STORE . F. TO 
ELSE 

SELECT 3 
APPEND BLANK 
REPLACE rank WITH F-> rank 
REPLACE name WITH F-> name 
REPLACE spec WITH F— > spec 
STORE count 1 + 1 TO count 1 
SELECT 6 
SKIP 



IF EOF!) 

STORE . F. TO contin 
ELSE 

SELECT 4 
APPEND BLANK 

REPLACE rank WITH F-> rank 
REPLACE name WITH F-) name 
REPLACE spec WITH F-> spec 
STORE counts + 1 TO counts 
SELECT 6 
SKIP 
ENDIF 



IF EOF!) 

STORE . F. TO 
ELSE 

SELECT 5 
APPEND BLANK 
REPLACE rank 
REPLACE name 
REPLACE spec 
STORE counts 
SELECT 6 
SKIP 
ENDIF 



cont i n 



WITH F— > rank. 
WITH F— > name 
WITH F— > spec 
+ 1 TO counts 



ENDIF 

ENDDO 

CLEAR 

STORE ’ ’ TO ans 

0 19, 23 SAY ’THE THREE SHIFTS ARE READY’ 

0 EG, £3 SAY ’DO YOU WANT TO SEE THEM? (Y/N) ==> ’ GET an 

READ 
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IF UPPER (ar.s) = ’ Y’ 

STORE .F. TO fin 
STORE 0 TO ch 
DO WHILE .NOT. fir. 

DO screeriS 

0 9,34 SPY ’YOUR CHOICE 



0 12, 3© SAY ’SHIFT A 1’ 

0 13,30 SAY ’SHIFT B 2’ 

0 14,30 SAY ’SHIFT C 3’ 

0 15,30 SAY ’EXIT 4’ 

0 IS, 10 CLEAR 

0 20, 2S SAY ’ENTER YOUR CHOICE ==> ’ GET ch , 



PICTURE ’S’ RANGE 1,4 

READ 

DO CASE 

CASE ch = 1 
CLEAR 
SELECT 3 
GO TOP 

DO WHILE .NOT. EOF ( ) 

DISPLAY rank, r.arne, spec 
DO delayl 
SK I P # 

ENDDO 

CASE ch = 2 
CLEAR 
SELECT 4 
GO TOP 

DO WHILE .NOT. EOF ( ) 

DISPLAY rank, name, spec 
DO delayl 
SKIP 
ENDDO 

CASE ch = 3 
CLEAR 
SELECT 5 
GO TOP 

DO WHILE .NOT. EOF O 

DISPLAY rank, name, spec 
DO delayl 
SKIP 
ENDDO 

CASE ch = 4 

STORE . T. TO fin 

ENDCASE 

CLEAR 
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I.*- - NOT. fin 

STORE 1 ’ TO res 



0 £0,18 SPY ’DO 
0 £1,18 SPY ’ 
REPD 

IF UPPER (res) # 
STORE . T. TO 
END IF 
END IF 
ENDDO 



YOU WANT TO SEE PNY UNE OF THE’ 
SHIFTS PGP IN? (Y/N) ==> ? GET 



f in 



ENDIF 



*■ update SPY file 
SELECT 1 
GO TCP 

LOCPTE FOR password = psw 
SELECT £ 

APPEND BLANK 

REPLACE date WITH DATE ( ) 

REPEPCE time WITH TIMEO 
REPLACE username WITH A— > username 
REPLACE jobdescr WITH ’ALLOCATION’ 
REPLACE prog name WITH ’SHIFTS’ 

CLEAR 

CLOSE DATABASES 
DELETE FILE tmpshift.dbf 
DELETE FILE tmpshift.ndx 
RETURN 
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0. PROGRAMS PRODUCING THE REQUIRED LISTS 



*■** PROGRAM REPORTER 

* displays on the screen or prints 

* a number of lists according to 

* user’ s requests 

CLEAR 

STORE -F- TO stop 

PUBLIC rcode 

DO WHILE -NOT. stop 
DO submenu4 
DO CASE 

CASE rcode = 0 
RETURN 

CASE rcode = 1 
DO listl 
CASE rcode = 2 
DO lists 
CASE rcode = 3 
DO list3 
CASE rcode = 4 
DO list 4 
CASE rcode = 5 
DO lists 
CASE rcode = S 
DO lists 
CASE rcode = 7 
DO list 7 
CASE rcode = 8 
DO lista 
CASE rcode = S 
DO lists 

ENDCASE 

ENDDO 

RETURN 
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*** PROGRAM SUBMENU 



CL 


EAR 














PUBLIC r 


'code 












3 i URE 


0 


TO rc«: 


nde 










|Cl 


5, 


14 


SAY ’ IMMMMMMMMMMMr'IMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM, 




0 


6, 


14 


SAY ’ 






SUBMENU 3 






0 


7, 


14 


SAY ’ 






MMMMMMMMM 




i 


0 


a, 


14 


SAY ’ 










5 


0 


3, 


14 


SAY ’ 


EXIT 


TO 


MAIN MENU 


. 0 


9 


0 


10, 


14 


SAY ’ 


LIST 


OF 


CREW IN SOME ORDER 


■i 


5 


0 


11, 


14 


SAY ’ 


LIST 


OF 


REQUESTED INFO OF CREW 




9 


0 


i£. 


14 


SAY ’ 


LIST 


OF 


CREW OF A REQUESTED DEPARTMENT. 


. 3 


7 


0 


13, 


14 


SAY ’ 


LIST 


OF 


CREW OF A REQUESTED SUBDEPARTMENT4 


9 


0 


14, 


14 


SAY ’ 


LIST 


OF 


CREW ALLOCATED INTO 2 SHIFTS . . 


. . D 


? 


0 


15, 


14 


SAY ’ 


LIST 


OF 


CREW ALLOCATED INTO 3 SHIFTS . . 


• . 6 


9 


0 


16, 


14 


SAY ’ 


SHIP 


ORGANIZATION DURING SURFACE ALERT 


. . 7 


f 


0 


17, 


14 


SAY ’ 


SHIP 


ORGANIZATION DURING AIR ALERT .... 


. . 8 


5 


0 


ia. 


14 


SAY ’ 


SHIP 


ORGANIZATION DURING GENERAL ALERT 


. . 9 


9 


0 


13, 


14 


SAY ’ HMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMfnMM < " 



SET COLOR TO W+ 

0 21,26 SAY ’ENTER YOUR SELECTION ==> ’ , 

GET rcode PICTURE ’9’ RANGE 0,9 

READ 

SET COLOR TO Ul 
RETURN 
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*** PROGRAM LIST1 



CLEAR 

USE crewrnernb 

INDEX ON rank TO crewrnernb 
DO screenE 

^ 3,29 SAY ’AUXILIARY FILE CREATION’ 

STORE . T. TO again 

SELECT 1 

USE ranks 

SELECT 2 

USE specialt 

SELECT 3 

USE ordcrew 

GO TOP 

DELETE NEXT 100 
PACK 

SELECT 4 

USE crewrnernb INDEX cr ewrnemb 



GO TOP 

DO WHILE again 
IF EOF ( ) 

' STORE - F. TO again 
ELSE 

SELECT 1 
GO TOP 

LOCATE FOR rankcode 
SELECT £ 

GO TOP 

LOCATE FOR speccode 
SELECT 3 
APPEND BLANK 
REPLACE serno WITH 
REPLACE name WITH 
REPLACE indate WITH 
REPLACE outdate WITH 
REPLACE rank WITH 
REPLACE spec WITH 
SELECT 4 
SKIP 
END IF 
ENDDO 

STORE - F. TO printer 
STORE ’ ’ TO ans 

CLOSE DATABASES 
DELETE FILE crewrnernb. ndx 



= D— > rank 



= D— > spec 



D— > serno 
D— > name 
D— > rndate 
D— > outdate 
A— > ranknarne 
B— > specnarne 
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DO WHILE UPPER Cans) # ’ N’ 

SELECT 3 
USE or d crew 
STORE -F. TO a 
STORE . F. TO b 
STORE . F. TO c 
STORE . F. TO d 
DO screen^ 

0 9,34 SPY ’YOUR CHOICE’ 

0 IE, 28 SPY ’ LIST (S ) ON SCREEN : 1’ 

0 13, 28 SPY ’ LIST (S ) ON PRINTER : 2’ 

0 18,23 CLEPR 
STORE 0 TO resp 

0 20,28 SPY ’ENTER YOUR CHOICE ==> ’ GET 

PICTURE ’9’ RPNGE 1,2 

REPD 

IF resp = 2 

STORE . T. TO printer 

0 20,28 SPY ’PUT YOUR PRINTER ON ’ 
DO delay 
END IF 



0 


12,28 


SPY 


’ SORTED 


ON 


NPMES 


: 1’ 


0 


13, 28 


SPY 


’ SORTED 


ON 


RPNKS 


: 2’ 


0 


14, 28 


SPY 


’ SORTED 


ON 


INDPTE 


: 3’ 


0 


15, 28 


SPY 


’ SORTED 


ON 


OUTDPTE 


4’ 


0 


18, 23 


CLEPR 








STORE 0 


TO 


resp 








0 


20, 28 


SPY 


’ ENTER YOUR 


CHOICE 


II 

II 

V 

m 


PICTURE 


5 9’ 


RPNGE 1, 


4 







REPD 

IF resp = 1 

STORE . T. TO a 
INDEX ON name TO ordcrew 
ELSE 

IF resp = 2 

STORE . T. TO b 
ELSE 

IF resp =3 

STORE . T. TO c 
INDEX ON indate TO ordcrew 
ELSE 

IF resp = 4 

STORE -T. TO d 
INDEX ON outdate TO ordcrew 
END IF 
ENDIF 
END IF 
ENDIF 



resp , 



resp , 
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SELECT 3 
IF printer 

SET PRINT ON 
IF a 

REPORT FORM 1st la 
ELSE 

IF b 

REPORT FORM 1st lb 
ELSE 

IF c 

REPORT FORM lstlc 
ELSE 

IF d 

REPORT FORM 1st Id 
END IF 
END IF 
END IF 
ENDIF 

SET PRINT OFF 
ELSE 

CLEAR 
GO TOP 
~ IF a 

DO WHILE .NOT. EOF ( ) 

DISPLAY name, rank, spec 
DO delayl 
SK I P 
ENDDO 
ELSE 

IF b 

DO WHILE .NOT. EOF ( ) 

DISPLAY rank, spec, name 
DO delayl 
SKIP 
ENDDO 
ELSE 

IF c 

DO WHILE -NOT. EOF ( ) 

DISPLAY iridate, name, rank, 
DO delayl 
SKIP 
ENDDO 



spec 
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spec 



ELSE 

IF d 

DO WHILE -NOT. EOF ( ) 

DISPLAY out date, name, rank, 

DO delayl 
SK I P 
ENDDO 
END IF 
END IF 
END IF 
ENDIF 
END IF 
CLEAR 

CLOSE DATABASES 
IF -NOT- b 

DELETE FILE ordcrew. ndx 
ENDIF 

STORE ’ ’ TO ansr 

0 £0,28 SAY ’ DO YOU WANT TO SEE OR PRINT AGAIN’ 

0 21,28 SAY ’ ONE OF THE AVAILABLE LISTS?’ 

0 22,28 SAY ’ENTER YOUR ANSWER (Y/N) ==> ’ GET ansr 

READ 

IF UPPER (ansr) # ’ Y’ 

STORE ’ N’ TO ans 
ENDIF 
ENDDO 

CLEAR 

CLOSE DATABASES 
RETURN 
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-*** PROGRAM LISTS 



CLEAR 
SELECT 1 
USE ranks 
SELECT £ 

USE specialt 
SELECT 3 
USE intocrew 
DELETE NEXT 100 
PACK 

SELECT 4 
USE erewmernb 

INDEX ON name TO erewmernb 
GO TOP 



DO screens 



0 9,23 SAY ’ AYX ILI ARY FILE CREATION’ 

STORE - T. TO again 
DO WHILE again 
IF EOF ( ) 

STORE . F. TO again 
ELSE 

SELECT 1 
GO TOP 

LOCATE FOR rankcode = D->rank 
SELECT S 
GO TOP 

LOCATE FOR speeeode = D— > spec 
SELECT 3 
APPEND BLANK 
REPLACE name WITH 

REPLACE rank WITH 

REPLACE spec WITH 

REPLACE address WITH 

REPLACE phone WITH 

SELECT 4 



D— > name 
A— > ranknarne 
B— > specnarne 
D— > address 
D— > phone 



SKIP 
END IF 
ENDDO 

STORE . F. TO printer 
STORE ’ ’ TO ans 

DO WHILE UPPER (ans) # ’ N’ 
STORE .F. TO a 
STORE .F. TO b 
STORE . F. TO c 
STORE . F. TO d 
DO screens 



0 9,34 SAY ’YOUR CHOICE’ 

0 IS, SB SAY ’ LIST ( S) ON SCREEN : 1’ 
0 13, S8 SAY ’ LIST (S) ON PRINTER : S’ 
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1 



CLEAR 
TO resp 

SAY ’ ENTER YOUR 
’9’ RANGE 1,2 



CHOICE ==> ’ GET resp 



0 18,23 
STORE 0 
0 20, 28 
PICTURE 
READ 

IF resp = 2 

STORE . T. TO printer 
0 20,28 SAY ’PUT YOUR PRINTER ON 
DO delay 



END IF 
0 12,23 
0 13,28 
14, 28 



0 1 ! 



28 



0 
0 

0 18,23 
STORE 0 
0 20, 28 
PICTURE 
READ 



SAY ’NAME AND RANK : 1’ 

SAY ’ NAME AND PHONE : 2’ 

SAY ’ NAME AND ADDRESS : 3’ 

SAY ’ NAME-ADDRESS-PHONE : 4’ 

CLEAR 
TO resp 

SAY ’ENTER YOUR CHOICE ==> ’ GET resp 
’9’ RANGE 1,4 



IF resp = 1 

STORE . T. TO a 
ELSE 

IF resp = 2 

STORE . T- TO b 
ELSE 

IF resp =3 

STORE . T. TO c 
ELSE 

IF resp = 4 

STORE . T. TO d 
END IF 
END IF 
ENDIF 
END IF 



SELECT 3 
IF printer 

SET PRINT ON 
IF a 

REPORT FORM lst2a 
ELSE 

IF b 

REPORT FORM lst2b 
ELSE 

IF c 

REPORT FORM lst2c 
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ELSE 

IF d 

REPORT FORM 1st 2d 
END IF 
END IF 
END IF 
END IF 

SET PRINT OFF 
ELSE 

CLEAR 
GO TOP 
IF a 

DO WHILE .NOT. EOF ( ) 

DISPLAY name, rank, spec 
DO delayl 
SKIP 
ENDDO 
ELSE 

IF b 

DO WHILE .NOT. EOF ( ) 

DISPLAY name, phone 
DO delayl 
SKIP 
ENDDO 

ELSE ' 

IF e 

DO WHILE .NOT. EOF ( ) 

DISPLAY name, address 
DO delayl 
SKIP 
ENDDO 
ELSE 

IF d 

DO WHILE -NOT. EOF ( ) 

DISPLAY name, address, phone 
DO delayl 
SKIP 
ENDDO 
END IF 
END IF 
END IF 
END IF 
ENDIF 
CLEAR 

STORE ’ ’ TO ansr 

0 20,23 SAY ’DO YOU WANT TO SEE OR PRINT AGAIN’ 

0 21,28 SAY ’ ONE OF THE AVAILABLE LISTS?’ 

0 22,28 SAY ’ENTER YOUR ANSWER (Y/N) ==> ’ GET ansr 
READ 
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IF UPPER (ansr) # 1 Y’ 
STORE » N’ TO a ns 
END IF 
ENDDO 

CLEAR 

CLOSE DATABASES 

DELETE FILE crewmernb. nd 

RETURN 



*** PROGRAM LIST3 



CLEAR 

DO screens 

£ 9,29 SAY ’AUXILIARY FILE CREATION’ 

SELECT 1 

USE ranks 

SELECT 2 

USE specialt 

SELECT 3 

USE deplst 

DELETE NEXT 100 

PACK 

SELECT 4 
USE subdeptn 
SELECT 5 
USE depart rn 
SELECT 6 



again 

TO tdpnarne 



USE crewmemb 

INDEX ON rank TO crewmemb 
GO TOP 

STORE . T. TO again 
DO WHILE again 
IF EOF ( ) 

STORE .F. TO 
ELSE 

STORE ’ ’ 

SELECT 1 

LOCATE FOR rankcode = F— > rank 
SELECT 2 
GO TOP 

LOCATE FOR speccode = F— > spec 
SELECT 4 
GO TOP 

LOCATE FOR subdpcode = B— > subdpcode 
SELECT 5 
GO TOP 

LOCATE FOR depcode = D— > depcode 
IF EOF ( ) 

STORE ’DECK’ TO tdpnarne 
END IF 
SELECT 3 
APPEND BLANK 

REPLACE serno WITH F-> serno 
REPLACE name WITH F->narne 
REPLACE ranknarne WITH A-> rankname 
REPLACE specname WITH B— > specnarne 
IF tdpnarne = ’ ’ 

REPLACE depnarne WITH E— > depname 
ELSE 



REPLACE depnarne WITH tdpnarne 
END IF 
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SELECT 6 
SKIP 
END IF 
ENDDO 

STORE . F. TO printer 
STORE ’ ’ TO ans 

DO WHILE UPPER (ans) # ’ N’ 

SELECT 3 
GO TOP 

STORE . F. TO a 
STORE . F. .TO b 
DO screens 

0 9,34 SPY ’YOUR CHOICE’ 

i“ 12, £8 SAY ’LIST (3) ON SCREEN : 1’ 

0 13,28 SAY ’ LIST (S) ON PRINTER : 2’ 

0 18,23 CLEAR 
STORE 0 TO resp 

0 20,23 SAY ’ENTER YOUR CHOICE ==> ’ GET resp , 

PICTURE ’9’ RANGE 1,2 

READ 

IF resp = 2 

STORE . T. TO printer 

0 20,23 SAY ’PUT YOUR PRINTER ON ’ 

DO delay 
ENDIF 

0 12,28 SAY ’DECK DEPERTMENT : 1’ 

0 13,28 SAY ’MACHINE DEPARTMENT : 2’ 

0 18,23 CLEAR 
STORE 0 TO resp 

0 20,28 SAY ’ENTER YOUR CHOICE ==> ’ GET resp , 

PICTURE ’9’ RANGE 1,2 

READ 

IF resp = 1 

STORE . T. TO a 
ELSE 

STORE . T. TOb 
ENDIF 

IF printer 

SET PRINT ON 
IF a 

REPORT FORM lst3 FOR depnarne = ’DECK 
ELSE 

REPORT FORM lst3 FOR depnarne = ’MACHINE 
ENDIF 

SET PRINT OFF 
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ELSE 

CLEAR 
GO TOP 
IF a 

DO WHILE .NOT. EOF ( ) 

DISPLAY serrto, name, ranknarne, specnarne, depname 
FOR depname = ’ DECK ’ 

ENDDO 

ELSE 

DO WHILE .NOT. EOF ( ) 

DISPLAY serno, name, ranknarne, specnarne, depname 
FOR depname = ’MACHINE ’ 

ENDDO 
END IF 
ENDIF 
DO delay 
CLEAR 

STORE ’ ’ TO ansr 

0 £0,28 SAY ’DO YOU WANT TO SEE OR PRINT AGAIN’ 

0 £1,28 SAY ’ ONE OF THE AVAILABLE LISTS?’ 

0 ££,£8 SAY ’ENTER YOUR ANSWER (Y/N) ==> ’ GET ansr 

READ 

IF UPPER (ansr) # ’ Y’ 

STORE ’ N’ TO ans 
ENDIF 
ENDDO 



CLEAR 

CLOSE DATABASES 
RETURN 



-*** PROGRAM LIST 4 



CLEAR 

DO screen i2 

® 9,29 SAY ? AUXILIARY FILE CREATION’ 

SELECT 1 

USE ranks 

SELECT 2 

USE specialt 

SELECT 3 

USE sdeplst 

DELETE NEXT 10© 

PACK 

SELECT 4 
USE subdeptn 
SELECT 5 
USE crewrnern b 

INDEX ON rank TO crewrnemb 
GO TOP 

STORE . T. TO again 
DO WHILE again 
IF EOF ( ) 

■ STORE - F. TO again 
ELSE 

SELECT 1 

LOCATE FOR rankcode = E-> rank 
SELECT 2 
GO TOP 

LOCATE FOR speccode = E-> spec 
SELECT 4 
GO TOP 

LOCATE FOR subdpcode = B— > subdpcode 
SELECT 3 
APPEND BLANK 

REPLACE serno WITH E-> serno 
REPLACE name WITH E-> name 
REPLACE ranknarne WITH ft-> ranknarne 
REPLACE specnarne WITH B— > specname 
REPLACE sdpname WITH D-> sdpname 
SELECT 5 
SKIP 
END IF 
ENDDO 

STORE . F. TO printer 
STORE ’ ’ TO an s 
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DO WHILE UPPER (ans) # ’ N’ 

SELECT 3 
GO TOP 

STORE . F. TO deck 
STORE . F. TO machine 
DO screenE 

0 9, 34 SOY ’YOUR CHOICE’ 

0 IS, £8 SOY ’ LIST (S) ON SCREEN : 1’ 

@ 13, £8 SOY ’ LIST (S) ON PRINTER : S’ 

0 18, S3 CLEOR 
STORE O TO resp 

0 £0, S3 SOY ’ENTER YOUR CHOICE ==> ’ GET resp , 
PICTURE ’9’ RONGE 1,£ 

REOD 

IF resp = £ 

STORE . T. TO printer 

0 £0, £8 SOY ’PUT YOUR PRINTER ON ’ 

DO delay 
END IF 

0 IS, £3 SOY ’DECK DEPERTMENT : 1’ 

0 13,28 SOY ’MACHINE DEPORTMENT : £’ 

0 13, £3 CLEOR 
STORE 0 TO answr 

0 £0, £8 SOY ’ENTER YOUR CHOICE ==> ’ GET answr , 
PICTURE ’9’ RONGE 1,£ 

REOD 

IF answr = 1 

STORE . T. TO deck 
STORE 0 TO pref 



0 


1 1, 28 


SAY 


’ ODMINISTROTION . . . 


... 1’ 


0 


12, 28 


SAY 


’ COMBAT INFORM 


2 ’ 


0 


13,28 


SAY 


’ COMMUNICATION 


... 3’ 


0 


14, 28 


SAY 


’NAVIGATION 


... 4’ 


0 


15, 28 


SAY 


’ WEAPONS 


... 5’ 


0 


18, 23 


CLEOR 




Ce* 


20, 88 


SOY 


’ENTER YOUR CHOICE 


==> ’ GET 


PICTURE 


’ 9’ 


RONGE 1,5 





REOD 

ELSE 



STORE 0 


TO 


pref 




0 11, £3 


SOY 


’DAMAGE CONTROL ... 


... 1’ 


0 1£, £8 


SOY 


’ELECTRIC INSTAL .. 


O J 


0 13, £8 


SOY 


’ELECTRON EQUIPT .. 


3’ 


0 14, £8 


SOY 


’ MO I N ENGINES 


. . . 4’ 


0 15, £8 


SOY 


’ SPARE PARTS 


... 5’ 


0 18, £3 


CLEAR 




0 £0, £8 


SOY 


’ ENTER YOUR CHOICE 


==> ’ GET 


PICTURE 


’ 9’ 


RANGE 1,5 




READ 









END IF 
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F 



printer 
SET PRINT ON 
IF deck 



DO CASE 
CASE 



UASE 



CASE 



CASE 



CASE 



ENDCASE 



ELSE 

DO CASE 
CASE 



CASE 



CASE 



CASE 



pref = i 
SET PRINT OF 
SET COLOR TO W-* 

0 9, 34 SAY 1 ** SORRY 

SET COLOR TO W 

0 ii, as SAY 1 ’ 

0 IE, £6 SAY 1 I CANNOT PROVIDE YOU THIS LIST’ 
0 13, £6 SAY ’ THIS SUBDEPARTMENT MUST BE ? 
0 14, £6 SAY ’ MANNED MANUALLY ’ 

0 15, £S SAY ’ 

DO delay£ 
pref = £ 

REPORT FORM lst4 FOR sdpr.arne = ’ COMBAT INFO 
SET PRINT OFF 



pref = 3 

REPORT FORM lst4 FOR sd pr.arne— COMMUNICATIONS 
SET PRINT OFF 
pref = 4 

REPORT FORM lst4 FOR sdpr.arne = ’ NAVIGATION 
SET PRINT OFF 
pref = 5 

REPORT FORM lst4 FOR sdpr.arne = ’ WEAPONS 
SET PRINT OFF 



pref = 1 

SET PRINT OFF 

SET COLOR TO W* 

0 9, 34 SAY 1 ** SORRY *■*» 

SET COLOR TO W 
0 11, £6 SAY ’ 

0 1£, £6 SAY ’I CANNOT PROVIDE YOU THIS LIST' 
0 13, £6 SAY 5 THIS SUBDEPARTMENT MUST BE 7 
0 14, £6 SAY ’ MANNED MANUALLY ’ 

DO delay£ 
pref = £ 

REPORT FORM lst4 FOR sripnarne^’ ELECTR. INSTAL 
SET PRINT OFF 
pref = 3 

REPORT FORM lst4 FOR sdpnarne=’ ELECTR, EQUIPM 
SET PRINT OFF 
pref = 4 

REPORT FORM lst4 FOR sdpnarne^ MAIN ENGINES 
SET PRINT OFF 
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CASE 



ENDCASE 

ENDIF 

ELSE 

CLEAR 
GO TOP 
IF deck 



pref = 5 

SET PR IN OFF 

SET COLOR TO W* 

if* 9, 34 SAY ’ -** SORRY **’ 

SET COLOR TO W 
0 11,26 SAY ’ 

0 12,26 SAY ’I CANNOT PROVIDE YOU THIS LIST 
0 13,26 SAY ’ THIS SUBDEPARTMENT MUST BE 
0 14,26 SAY ’ MANNED MANUALLY 

0 15, 26 SAY ’ 

DO del ay2 



DO CASE 

CASE pref = 1 

DO screen2 
SET COLOR TO W * 

0 9,34 SAY ’ ** SORRY **’ 

SET COLOR TO W 
0 1 1 , 26 SAY ’ 

0 12,26 SAY ’I CANNOT PROVIDE YOU THIS LIST 
0 13,26 SAY ’ THIS SUBDEPARTMENT MUST BE 
0 14,26 SAY ’ MANNED MANUALLY 

0 15,26 SAY ’ 

DO delay2 
CLEAR 



CASE pref = 2 

DO WHILE . NOT- EOF ( ) 

DISPLAY name, ranknarne, specnarne, sdpnarne , 
FOR sdpnarne = ’COMBAT INFO ’ 

ENDDO 



LASE pref — 3 

DO WHILE -NOT. EOF ( ) 

DISPLAY name, rankname, specnarne, sdpnarne , 
FOR sdpnarne = ’COMMUNICATIONS ’ 

ENDDO 



CASE pref = 4 

DO WHILE -NOT. EOF ( ) 

DISPLAY name, rankname, specnarne, sdpnarne , 
FOR sdpnarne = ’NAVIGATION 
ENDDO 

CASE pref = 5 

DO WHILE -NOT. EOF ( ) 

DISPLAY name, rankname, specnarne, sdpnarne , 
FOR sdpnarne = ’ WEAPONS ’ 

ENDDO 



ENDCASE 
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ELSE 

DO CASE 
CASE 



CASE 



CASE 



pref = 1 
DO screenE 



SE ! CuLOR TO W^*- 



if* 9, 34 SAY ’ ** SORRY **’ 

SET COLOR TO W 
If* 11, 26 SAY ’ 

if* 12, 26 SAY ’ I CANNOT PROVIDE YOU THIS LIST 
@ 13,26 SAY ’ THIS SUBDEPARTMENT MUST BE 
if* 14,26 SAY ’ MANNED MANUALLY 

0 15,26 SAY ’ 

DO delay2 
CLEAR 
pref = 2 



DO WHILE - NOT. EOF O 

DISPLAY name, ranknarne, specnarne, sdpname , 
FOR sdpr.arne = ’ ELECTRIC INSTAL’ 

ENDDO 
pref = 3 

DO WHILE .NOT. EOF ( ) 

DISPLAY name, ranknarne, specnarne, sdpname , 
FOR sdpname = ’ELECTRON EQUIPM’ 

ENDDO 



CASE pref — 4 

DO WHILE .NOT. EOF ( ) 

DISPLAY name, ranknarne, specnarne, sdpname , 
FOR sdpname = ’MAIN ENGINES 
ENDDO 

CASE pref = 5 

DO screens 
SET COLOR TO W* 

0 9, 34 SAY ’ -*-* SORRY *-*’ 

SET COLOR TO W 
0 1 1 , 26 SAY ’ 

if* 12,26 SAY ’I CANNOT PROVIDE YOU THIS LIST 
if* 13,26 SAY ’ THIS SUBDEPARTMENT MUST BE 
if* 14,26 SAY ’ MANNED MANUALLY 

if* 15,26 SAY ’ 

DO delayS 

ENDCASE 
END IF 

END IF 

STORE ’ ’ TO ansr 

if* 20,28 SAY ’DO YOU WANT TO SEE OR PRINT AGAIN’ 

& 21,28 SAY ’ ONE OF THE AVAILABLE LISTS?’ 

@ 22,28 SAY ’ENTER YOUR ANSWER (Y/N) ==> ’ GET ansr. 

READ 

IF UPPER (ansr) # ’ Y’ 



STORE ’ N’ TO ans 
ENDIF 
ENDDO 
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CLEAR 

CLOSE DATABASES 

DELETE FILE crewmernb. ndx 

RETURN 



*** PROGRAM LISTS 



CLEAR 

STORE . F. TO a 

STORE . F. TO b 

STORE . F. TO printer 

SELECT 1 

USE shiftEa 

SELECT 2 

USE shiftEb 

SELECT 3 

USE ranks 

select 4 

USE specialt 

SELECT 5 

USE shi ft 1st 

DELETE NEXT 100 

PACK 

STORE ’ ’ TO ans 

DO WHILE UPPER (ans) # ’ N’ 

DO screenE 

0 9,34 SAY ’YOUR CHOICE’ 

0 ~1£, E8 SAY ’ LIST (S) ON SCREEN : 1’ 

0 13, £8 SAY ’ LIST ( S ) ON PRINTER : 3’ 

0 18, E3 CLEAR 
STORE 0 TO resp 

0 E0,ES SAY ’ENTER YOUR CHOICE ==> ’ GET 

PICTURE ’9’ RANGE 1,2 

READ 

IF resp = E 

STORE . T. TO printer 

0 £0,£6 SAY ’PUT YOUR PRINTER ON ’ 



DO delay 
ENDIF 

0 iE, E8 SAY ’ ’ 

0 13, E3 SAY ’ ’ 

0 IE, 30 SAY ’SHIFT A 1’ 

0 13,30 SAY ’SHIFT B E’ 

0 14,30 SAY ’SHIFT A AND B ... 3’ 

0 15,30 SAY ’EXIT 4’ 

0 18, E3 CLEAR 
STORE 0 TO resp 

0 E0, £8 SAY ’ENTER YOUR CHOICE ==> ’ GET 



PICTURE ’9’ RANGE 1,4 
READ 



DO CASE 










CASE 


resp = 


1 








STORE . 


T. 


TO 


a 




STORE . 


F- 


TO 


b 


CASE 


resp = 


o 

* 








STORE . 


F. 


TO 


a 




STORE . 


T. 


TO 


b 



resp , 



resp , 



13 9 ' 



CASE res p = 
STORE - 
STORE . 

ENDCASE 
IF res p # 4 

0 9, £5 SAY 

0 10,25 SAY 
£ 11,25 SAY 
0 12,25 SAY 
0 13,25 SAY 
0 14,25 SAY 
0 15,25 SAY 



T. 

T. 



Tu a 
TO b 



IF a 

SELECT 1 
GO TOP 

STORE . T. TO again 
DO WHILE again 
IF EOF ( ) 

STORE . F. TO again 
ELSE 

SET COLOR TO W* 

0 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
SELECT 3 
GO TOP 

LOCATE FOR rankcode = A— > rank 
SELECT 4 
GO TOP 

LOCATE FOR speceode = A-> spec 
SELECT 5 
APPEND BLANK 

REPLACE rank WITH C-> rankname 
REPLACE name WITH A— > name 
REPLACE spec WITH D->specname 
SELECT 1 
SK I P 
END IF 
ENDDO 
CLEAR 
SELECT 5 
IF printer 

SET PRINT ON 
REPORT FORM lshift2a 
SET PRINT OFF 
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spec 



ELSE 

GO TOP 

DO WHILE -NOT. EOF ( ) 

DISPLAY name, rank, 

DO del ay 1 
SKIP 
ENDDO 
ENDIF 
END IF 
CLEAR 
GO TOP 

DELETE NEXT 100 
PACK 

IF b 

DO screen^ 

0 10, £5 SAY * 

SELECT 2 
GO TOP 

STORE - T. TO again 
DO WHILE again 
IF EOF ( ) 

STORE . F. TO again 
ELSE 

SET COLOR TO W* 

0 12,25 SAY * PROCESSING IN PROGRESS 7 

SET COLOR TO W 
SELECT 3 
GO TOP 

LOCATE FOR rankcode = B-> rank 
SELECT 4 
GO TOP 

LOCATE FOR speccode = B— > spec 
SELECT 5 
APPEND BLANK 

REPLACE rank WITH C-> rankname 
REPLACE name WITH B-> name 
REPLACE epee WITH D-> spscnarne 
SELECT 2 
SKIP 
ENDIF 
ENDDO 
CLEAR 
SELECT 5 
GO TOP 
IF printer 

SET PRINT ON 
REPORT FORM lehift2b 
SET PRINT OFF 
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spec 



ELSE 

GO TOP 

DO WHILE .NOT. EOF ( ) 

DISPLAY name, rank, 

DO delayl 
SKIP 
ENDDO 
END IF 
END IF 
CLEAR 
GO TOP 

DELETE NEXT 100 
PACK 

STORE ’ ’ TO ansr 

@ £0,28 SAY ’DO YOU NEED MORE OF THE ABOVE’ 

0 £1,28 SAY ’ AVAILABLE LISTS?’ 

@ 22,28 SAY ’ENTER YOUR ANSWER (Y/N) ==> ’ GET ansr 

READ 

IF UPPER (ar.sr) # ’ Y’ 

STORE ’ N’ TO ans 
END IF 
ELSE 

STORE ’ N’ TO ans 
END IF 
ENDDO 

CLEAR 

CLOSE DATABASES 
RETURN 
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*** PROGRAM LISTS 



CLEAR 

STORE . F. TO a 
STORE . F. TO b 
STORE - F. TO c 
STORE . F. TO printer 
SELECT 1 
USE shift 3a 
SELECT £ 

USE sh i ft 3b 
SELECT 3 
USE sh i ft 3c 
SELECT 4 
USE ranks 
select 5 



USE specialt 
SELECT S 
USE shift 1st 
DELETE NEXT 100 
PACK 

STORE 7 7 TO ans 

DO WHILE UPPER (ans) # 7 N 7 
DO screenE 

0 9, 34 SAY 7 YOUR CHOICE 7 

0 13, 33 SAY 7 LIST (S) ON SCREEN : l 7 

0 13, £0 SAY 7 LIST (S) ON PRINTER : 3 7 
0 13,33 CLEAR 
STORE 0 TO resp 

0 30, £8 SAY 7 ENTER YOUR CHOICE ==> 7 GET 

PICTURE 7 9 7 RANGE 1,3 

READ 

IF resp = 3 

STORE - T. TO printer 

0 £0,33 SAY 7 PUT YOUR PRINTER ON 7 



DO delay 
END IF 

0 13, £3 SAY 7 

0 13, 38 SAY 7 

0 13,30 SAY 7 SHIFT A 

0 13,30 SAY 7 SHIFT B 

0 14,30 SAY 7 SHIFT C 

0 15, 30 SAY 7 EXIT 



0 18,33 CLEAR 
STORE 0 TO resp 

0 30, 33 SAY 7 ENTER YOUR CHOICE 

PICTURE 7 9 7 RANGE 1,4 

READ 



l 7 
£ 7 
3 7 
4 7 



==> 7 



■» 



GET 



resp , 



resp , 
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DO CASE 



CASE 


resp = 


1 








STORE . 


T. 


TO 


a 




STORE . 


F. 


TO 


b 




STORE . 


F. 


TO 


c 


CASE 


resp = 


2 








STORE . 


F. 


TO 


a 




STORE . 


T. 


TO 


b 




STORE . 


F. 


TO 


c 


CASE 


resp = 


«j 








STORE . 


F. 


TO 


a 




STORE - 


F. 


TO 


b 




STORE . 


T. 


TO 


c 


ENDCASE 










IF resp 


# 4 









£ 9, 25 SAY ’ ’ 

0 10,25 SAY ’ ’ 

0 11,25 SAY ’ ’ 

0 12,25 SAY ’ 

0 13,25 SAY ’ 

0 14,25 SAY ’ 5 

0 15,25 SAY ’ ’ 

IF a 

SELECT 1 
GO TOP 

STORE . T. TO again 
DO WHILE again 
IF EOF ( ) 

STORE . F. TO again 
ELSE 

SET COLOR TO W* 

0 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
SELECT 4 
GO TOP 

LCCATE FOR ran kcode = A-> rank 
SELECT 5 
GO TOP 

LOCATE FOR speccode = A—) spec 
SELECT 6 
APPEND BLANK 

REPLACE rank WITH D-> rank name 
REPLACE name WITH A— > name 
REPLACE spec WITH E-> specname 
SELECT 1 
SKIP 
END IF 
ENDDO 
CLEAR 
SELECT 6 
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IF printer' 

SET PRINT ON 
REPORT FORM 1 shift 3a 
SET PRINT OFF 
ELSE 

GO TOP 

DO WHILE .NOT. EOF ( ) 

DISPLAY name, rank, spec 
DO delayl 
SKIP 
ENDDO 
END IF 
END IF 
CLEAR 
GO TOP 

DELETE NEXT 100 
PACK 

IF b 

DO screenE 

0 10, 25 SAY ’ ’ 

SELECT 2 
GO TOP 

STORE . T. TO again 
DO WHILE again 
IF EOF ( ) 

STORE . F. TO again 
ELSE 

SET COLOR TO W* 

Q 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
SELECT 4 
GO TOP 

LOCATE FOR rankcode = B-> rank 
SELECT 5 
GO TOP 

LOCATE FOR speccode = B— > spec 
SELECT 6 
APPEND BLANK 

REPLACE rank WITH D-> rankname 
REPLACE name WITH B-> name 
REPLACE spec WITH E— > specname 
SELECT 2 
SKIP 
END IF 
ENDDO 
CLEAR 
SELECT S 
GO TOP 
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If- printer 

SET PRINT ON 
REPORT FORM IshiftSb 
SET PRINT OFF 
ELSE 

SO TOP 

DO WHILE .NOT. EOF ( ) 

DISPLAY name, rank, spec 
DO delayl 
SKIP 
ENDDO 
END IF 
END IF 
CLEAR 
GO TOP 

DELETE NEXT 100 
PACK 

IF c 

DO screenE 

& 10,25 SAY ’ ’ 

SELECT 3 
GO TOP 

STORE . T. TO again 
DO WHILE again 
IF EOF ( ) 

STORE . F. TO again 
ELSE 

SET COLOR TO W* 

& IS, 25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
SELECT 4 
GO TOP 

LOCATE FOR rankcode - C— > rank 
SELECT 5 
GO TOP 

LOCATE FOR speccode = C-> spec 
SELECT 6 
APPEND BLANK 

REPLACE rank WITH D— > ranknarne 
REPLACE name WITH C— > name 
REPLACE spec WITH E— > specname 
SELECT 3 
SKIP 
END IF 
ENDDO 
CLEAR 
SELECT 6 
GO TOP 
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u r j ce 






IF printer 

SET PRINT ON 
REPORT FORM I shift 3c 
ELSE 

GO TOP 

DO WHILE -NOT. EOF () 

DISPLAY name, rank, spec 
DO delayi 
SKIP 
ENDDO 
END IF 
END IF 
CLEAR 
GO TOP 

DELETE NEXT 100 
PACK 

STORE ’ ’ TO ansr 

£ £0,28 SAY ’DO YOU NEED MORE OF THE ABOVE’ 

0 SI, 28 SAY ’ AVAILABLE LISTS?’ 

0 22,28 SAY ’ENTER YOUR ANSWER (Y/N) ==> ’ GET ansr 
READ 

- IF UPPER (ansr) # ’ Y’ 

STORE ’ N’ TO ans 
END IF 
ELSE 

STORE ’N’ TO ans 
END I F 
ENDDO 

LEAR 

LOSE DATABASES 
ETUR’N 
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*** PROGRAM LIST7 



CLEAR 

STORE - F. TO printer 

SELECT 1 

USE ranks 

select E 

USE specialt 

SELECT 3 

USE salert 

SELECT 4 

USE alert 1st 

DELETE NEXT 100 

PACK 

STORE ’ ’ TO ar.5 

DO WHILE UPPER Cans) # ’ N’ 

DO screenE’ 

0 9,34 SAY ’ YOUR CHOICE’ 

0 IE, £8 SAY ’ LIST (S) ON SCREEN : 1’ 

0 13, ES SAY ’ LIST (S ) ON PRINTER : E’ 

0 18, £3 CLEAR 
STORE 0 TO resp 

0 *20, £8 SAY ’ENTER YOUR CHOICE ==> ’ GET resp , 
PICTURE ’ 9’ RANGE 1,£ 

READ 

IF resp = E 

STORE . T. TO printer 

0 £0, £8 SAY ’PUT YOUR PRINTER ON ’ 

DO delay 
END IF 

0 9, £5 SAY ’ * ’ 

0 IQ, £5 SAY ’ ’ 

0 i 1 , £5 SAY ’ 

0 IE, £5 SAY ’ ’ 

0 13, £5 SAY ’ ’ 

SET COLOR TO W* 

0 1£,£5 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
SELECT 3 
GO TOP 

DO WHILE .NOT. EOF ( ) 

SELECT 1 
GO TOP 

LOCATE FOR rankcode = C— > rank 
SELECT £ 

GO TOP 

LOCATE FOR speccode = C— > spec 
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WITH ft— > rankr.ame 
WITH C— > name 
WITH B— > specname 
WITH C-> descr 



SELECT 4 
APPEND BLANK 
REPLACE rank 
REPLACE name 
REPLACE spec 
REPLACE descr 
SELECT 3 
SKIP 
ENDDO 
CLEAR 
SELECT 4 
IF printer 

SET PRINT ON 
REPORT FORM Islrt 
SET PRINT OFF 
ELSE 

GO TOP 

DO WHILE -NOT. EOF ( ) 

DISPLAY descr, name 
DO delayl 
SKIP 
ENDDO 
END IF 
GO TOP 

DELETE NEXT 100 
PACK 
CLEAR 

STORE ’ ’ TO ar.sr 

0 30, 38 SAY ’ DO YOU WANT TO SEE OR 
@ 31,38 SAY ’ AGAIN?’ 

0 33,38 SAY ’ENTER YOUR ANSWER (Y/N) ==> ’ 
READ 

IF UPPER (ar.sr) # ’ Y’ 

S~"ORE ’ N’ TO ans 
END IF 
iNDDG 



rank, 



ioec 



PRINT THE LIST 



GET ans 



CLl^ft R 

CLOSE DATABASES 
RETURN 
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*** PROGRAM LISTS 



CLEAR 

STORE - F- TO printer 

SELECT 1 

USE ranks 

select 2 

USE specialt 

SELECT 3 

USE aalert 

SELECT 4 

USE alert 1st 

DELETE NEXT 100 

PACK 

STORE ’ ’ TO ans 

DO WHILE UPPER (ans) # ’ N’ 

DO screens 

0 9,34 SAY ’ YOUR CHOICE’ 

0 12, £8 SAY ’LIST(S) ON SCREEN : 1’ 

0 13,28 SAY ’LIST(S) ON PRINTER : 2’ 

0 IS, 23 CLEAR 
STORE 0 TO resp 

@-£0,28 SAY ’ENTER YOUR CHOICE ==> ’ GET resp , 

PICTURE ’9’ RANGE 1,2 

READ 

IF resp = 2 

. STORE - T. TO printer 
0 20,28 SAY ’PUT YOUR PRINTER ON ’ 

DO delay 
END IF 

0 9, 25 SAY ’ ’ 

0 10,25 SAY ’ ’ 

0 11, 25 SAY ’ ’ 

0 12,25 SAY ’ ’ 

0 13,25 SAY ’ ’ 

SET COLOR TO W* 

0 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
SELECT 3 
GO TOP 

DO WHILE -NOT. EOF ( ) 

SELECT 1 
GO TOP 

LOCATE FOR rankcode = C— > rank 
SELECT 2 
GO TOP 

LOCATE FOR speccode = C-> spec 
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SELECT 4 
APPEND BLANK 

REPLACE rank WITH fi-> rankname 
REPLACE name WITH C-> name 
REPLACE spec WITH B— > speename 
REPLACE deser WITH C— > descr 
SELECT 3 
SKIP 
ENDDO 
CLEAR 
SELECT 4 
IF printer 

SET PRINT UN 
REPORT FORM lalrt 
SET PRINT OFF 
ELSE 

GO TOP 

DO WHILE .NOT. EOF ( ) 

DISPLAY descr, name, rank, spec 
DO deiayl 
SKIP 
ENDDO 
END IF 
GO TOP 

DELETE NEXT 100 

PACK 

CLEAR 

STORE ’ ’ TO ar.sr 

@ £0,£8 SAY ’ DO YOU WANT TO SEE OR PRINT THE LIST 1 
0 El, £8 SAY ’ AGAIN?’ 

@ EE, £8 SAY ’ENTER YOUR ANSWER (Y/N) — > ’ GET ar.sr 

READ 

IF UPPER (arisr) # ’ Y’ 

STORE ’ N’ TO ans 
END IF 
ENDDO 

CLEAR 

CLOSE DATABASES 
RETURN 
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**■* PROGRAM LISTS 



CLEAR 

STORE . F- TO printer 
SELECT 1 
USE ranks 
select £ 

USE specialt 
SELECT 3 
USE gal ert 
SELECT 4 
USE alert 1st 
DELETE NEXT 100 
PACK 

STORE ’ J TO ar.s 
DO WHILE UPPER (ar.s) # ’ N’ 

DO screer.E 

0 3, 34 SAY ’YOUR CHOICE’ 

0 12,28 SAY ’ LIST (S ) ON SCREEN : 1’ 

0 13, 28 SAY ’ LIST ( S ) ON PRINTER : 2’ 

0 13,23 CLEAR 
STORE 0 TO resp 

0-20,28 SAY ’ENTER YOUR CHOICE ==> ’ GET resp , 

PICTURE ’9’ RANGE 1,2 

READ 

IF resp = 2 

STORE . T. TO printer 

0 20,28 SAY ’PUT YOUR PRINTER ON 5 
DO delay 
END IF 

0 3,25 SAY ’ ’ 

0 10,25 SAY ’ ’ 

0 1 1, 25 SAY ’ ’ 

0 12,25 SAY ’ ’ 

0 13,25 SAY ’ ’ 

SET COLOR TO W* 

0 12,25 SAY ’ PROCESSING IN PROGRESS’ 

SET COLOR TO W 
SELECT 3 
GO TOP 

DO WHILE .NOT. EOF ( ) 

SELECT 1 
GO TOP 

LOCATE FOR rankcode = C— > rank 
SELECT 2 
GO TOP 

LOCATE FOR speccode = C— > spec 
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SELECT 4 
APPEND BLANK 
REPLACE rank 
REPLACE name 



REPLACE 



REPLACE 
SELECT 3 
SKIP 
ENDDO 
CLEAR 
SELECT 4 



spec 

riescr 



WITH 
WITH 
W I TH 
WITH 



IF printer 

SET PRINT ON 
REPORT FORM I girt 
SET PRINT OFF 



SE 



A-> rankname 
C-> name 
B-> specnarne 
C-> descr 



30 TOP 

DO WHILE -NOT. EOF < ) 

DISPLAY descr, name, rank, spec 
DO delayl 
SKIP 
ENDDO 
END IF 
GO TOP 

DELETE NEXT 10® 



PACK 



CLEAR 

STORE ’ ’ TO ansr 

@ 2®, 28 SAY ’ DO YOU WANT TO SEE OR PRINT THE 

@ 21,28 SAY ’ AGAIN?’ 

if* £2,28 SAY ’ENTER YOUR ANSWER (Y/N) ==> ’ GE 

READ 

IF UPPER (ansr) # ’ Y’ 



S l URL ’ N’ TO ans 



END IF 
ENDDO 



CLEAR 

CLOSE DATABASES 
RETURN 



LIST’ 

ansr 
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APPENDIX B 



Page No. 1 

Wb/ 1 7 / B o 

LIST Uh CKSW MLMbLhS bLK i LD 



un fHusE Names 



NAME 


rank 




S r L C i A L i 'i 


„ r- n f * l , 


Appel Jonn u 


ifc.NJ.UK 


LHihF 


PO 


ENGiNEhK 


— U / -3 H 


A r mo ut. Paul U 


fchAIIAN 






LUMMUNiCA 1 I UN 


2 i kJ j 4 


Armstrong David K 


SENIOR 


CHIEF 


PO 


RADAR USER 


^ U / s 


Beam Alan K 


SEAMAN 






E N G 1 N E fc. K 


... i *1 B / 


biondi Daniel M 


seaman 






Wt-APUN CUN'i RUL 


Lwbbb 


uavalini Larry F 


SEAMAN 






LNblNLhK 


24BS^ 


Clark Andrews l 


SEAMAN 






WEAPUN cuNTkul 


/ B 


Llark James D 


SEAMAN 






WEAPUN CUNTRUL 


JUS / ... 


Cline William R 


SEAMAN 






ELECTKUN I c 


ctll/J i b 


Concon Stepnen J 


LIEU TENANT 




UEut\ 


J O / ^ t. 


Condon Tim N 


pu 1st 


CLASS 




ELht 1'KlUiAN 




Ldson Alan ti 


bLAMAN 






hNblNhtK 


24BSS 


Emerson burt F 


1st LIEUTENANT 


DECK 


J U / 4 S 


Ertle Aaron P 


ENSIuN 






DECK 


JO / DO 


Ervin Joseph H 


ENSIGN 






ENGINEER 


^0 7 Lb 


K la mini Charles D 


SEAMAN 






WEAPUN USER 


JOSDO 


hogel Uregory b 


bhAflAN 






WhAPUN CUNTKUL 


JOSt-b 


betline Scott B 


SEAMAN 






ELECTRICIAN 


24SSB 


Gorman Dennis H 


Pu 1st 


CLASS 




ENGINEER 


jobs! 


Hobson Aaron M 


Pu 3rd 


CLASS 




ENG1 NEER 


2GSIO 


1 Del Peter J 


Pu Ena 


LLASS 




hLhC TKUNIh 


hWtid 7 


lilt 'Thomas C 


SEAMAN 






WhAPUN USER 


JOS i b 


Isola Mike L 


PG 3rd 


CLASS 




WEAPUN USER 


JOB 7 3 


Jallee Jay M 


LIEUTENANT 




ENGINEER 


JO / 4 1 


Jelterson Jack L 


ENSIGN 






DECK 


2 0 7 D tu 


hett David u 


ihAMAN 






tLhb 1 R 1 U 1 AN 


J 4 s s / 


KnuDis James P 


bhAflAN 






ENGINEER 


J4SJS 


Kuhn Robert H 


SEAMAN 






ENGINEER 


J4SD1 


Little Fredenk J 


seaman 






WEAPUN USER 


JOS4S 


Lyon Arthur B 


CH I Eh' 


PU 




bUPPLY 


JOBUS 


Mallon Patrick F 


iEAMAN 






CUMMUNILA 1 1UN 


21 JBS 


Markley Daniel T 


seaman 






NAV IUAT1UN 


J 1 JbJ 


Martyr Paul J 


seaman 






ENGINEER 


J 4 SOb 


McPherson Jack A 


SEAMAN 






CUMMUNICATiUN 


J 1 JB4 


Miller Jacj T 


SEAMAN 






WEAPUN UbEK 


JOS4B 


Nelan James H 


MAS TEH 


LH IEK 


PO 


WEAPUN CUNIRUL 


J O / b S 
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Page No. 3 

0t> / 17/U6 

LIST OF CREW MEMBERS SORTED 
ON THOSE NAMES 



name 



Rank 



SPECIALTY btutlU 



Newell Feet S 




MASTER 


CHIEF 


PG 


COMMUNICATION 


A v) / 7 j 


Nezart Jerome G 




CHIEF 


PG 




RADAK user 


LGbG l 


Nezos Fred T 




MASTER 


CH ILF 


PU 


ELECTRiCl AN 


AV) / / / 


Nicholson George K 


PO 1st 


C L Abb 




NAVlOA I1UN 


1 b 


Nikola Michael 


E 


SEAMAN 






ELECTRICIAN 


1 


Norton Harold G 




PO 2nd 


CLAbS 




WEAPON USER 


LGb4 b 


Pulk Richard G 




SEAMAN 






WEAPON USER 


LGb j& 


Uualls Terry U 




SEAMAN 






WEAPON USER 


Zl/Jbc/ 


Uuick Gim G 




PO 3rd 


CLAbS 




WEAPON CONTROL 


LGbSG 


Uumn Daniel F 




PO 3 I'd 


CLASb 




NAV I0AT10N 


LGSG1 


Ramey Harold A 




PO 3rd 


CLASS 




COMMUNICATION 


LGbbL 


Kugg Bill S 




MASTER 


CHIEF 


PG 


ELECTRONIC 


LG / tiW 


Russ Randy G 




SEAMAN 






ENOiNLER 


ZHji 


Kusso James D 




SENIOR 


CHIEF 


PU 


WEAPON USER 


zw/bb 


Sansiven Dan K 




SEAMAN 






NAVIGATION 


11 j j5 


Sestak Timothy 


W 


SEAMAN 






NAVIGATION 


j- 1 j jb 


bhapiro Edwin W 




SEAMAN 






NAV 1GAT10N 


rl 1 


Sorensen Donald 


M 


SEAMAN 






ELEC I RONIC 


SJ1L4 


Steevens James 


F 


PO 2nd 


CLAbS 




WEAPON CONTROL 


LGbbL 


Sturgeon James 


K 


SEAMAN 






ENGINEER 


jbj 


Tally Chris b 




LT. COMMANDER 




DECK 


LG / J4 


Tran Mike K 




SEAMAN 






SANITARY 


L 1 4Gb 


Trend Ted M 




seaman 






SUPPLY 


L14LJ 


Tngo Bum F 




CHIEF 


PG 




SANITARY 


LGbG / 


Unger Jell H 




SEAMAN 






ENGINEER 


214 Jb 


Weingarten bam 


F 


SEAMAN 






RADAR USER 


A 1 Jbb 


William Robert 


P 


SEAMAN 






ENGINEER 


A 1 4bb 
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Kage No. 1 

0b/l//ab 

LIST UK CHEW MEMBERS SORTED 





ON THOSE RANKS 




* 


RANK 


SPEC I ALT Y 


NAME 


bLK NU 



LT. COMMANDER 


DECK 


Tally 


Chris S 


20734 


LIEUTENANT 




DECK 


Concon 


Stephen J 


JW'/"Jb 


LIEUTENANT 




ENGINEER 


Jail ee 


Jay M 


20 / 4 J 


1st LIEUTENANT 


DECK 


Emerson hurt h 


2 W / 4 3 


ENS ION 






DECK 


Ertie 


Aaron P 


CUV jW 


ENSIGN 






DECK 


Teller 


son Jack L 


20 / jb 


ENSIGN 






EN G I NEER 


Ervin 


Joseph H 


^07 


MASTER 


CHI El' 


PU 


weapun CONTROL 


Nelan 


James H 


20 / t. -) 


MASTER 


CHIEF 


PO 


COMMUNICATION 


Newell 


Peet S 


20 / 7 - 


master 


CHIEF 


PO 


ELECTRICIAN 


Nezos 


Fred T 


i v) 7 / 7 


MASTER 


CHIEF 


PO 


ELECTRONIC 


Rugg Bill S 


-W7 CO 


SENIOR 


CHIEF 


PO 


WEAPON USER 


Russo 


James U 


zw /bj 


SEN I UR 


CHIEF 


PO 


RADAR USER 


Armstrong David K 


zu/bj 


SENIOR 


CHIEF 


PO 


ENGINEER 


A p pe 1 


John G 


207 0 4 


CHIEF 


PO 




RADAR USER 


Nezart 


Jerome o 


20doi 


CHIEF 


Pu 




SANITARY 


Tngo 


Burn F 


20 dO / 


CHIEF 


PO 




SUPPLY 


Lyon Arthur b 




RO 1st 


CLASS 




NAVIGATION 


Nicholson George R 


20 d l o 


RO 1st 


CLASS 




ENGINEER 


Gorman 


Dennis H 


2oddl 


PO 1st 


CLASS 




ELECTRICIAN 


Condon 


T i rn N 


ZQd40 


RO 2nd 


CLASS 




WEAPON USER 


Norton 


Harold G 


-Od4G 


RO 2nd 


CLASS 




WEAPUN CONTROL 


bteevens James P 




PO 2nd 


CLASS 




ELECTRONIC 


Ibel Peter J 


/ 


PO 3rd 


CLASS 




WEAPUN USER 


Isola 


Mike L 


2 O d / J 


PO 3rd 


CLASS 




WEAPON CONTROL 


Quick 


Gim G 


-Qdoo 


RO 3rd 


CLASS 




COMMUNICATION 


Rarney 


Harold A 


2UdOz 


PO 3rd 


CLASS 




NAVIGATION 


Quinn 


Daniel F 


20001 


PO 3rd 


CLASS 




ENGINEER 


Hobson 


Aaron M 


20010 


SEAMAN 






WEAPON USER 


lilt Thomas C 


2:00 It. 


SEAMAN 






WEAPON USER 


Dual 1 s 


Terry D 


200 2 / 


SEAMAN 






WEAPON USER 


Pulk Richard G 


200 jb 


SEAMAN 






WEAPON USER 


Miller- 


Jacj T 


200 4 d 


SEAMAN 






WEAPON USER 


Little 


Fredenk J 


20000 


SEAMAN 






WEAPUN USER 


F'iamini Charles D 


20000 


SEAMAN 






WEAPON CONTROL 


Fog el 


Gregory B 


2 O O to 


SEAMAN 






WEAPON CONTROL 


Clark 


Jamee D 


2007 2 


SEAMAN 






WEAPON CONTROL 


Clark 


Andrews I 


O 0 7 d 


SEAMAN 






WEAPUN CONTROL 


Biond i 


Daniel M 


20000 


SEAMAN 






COMMUNICATION 


Armout 


Paul G 


21024 


SEAMAN 






COMMUNICATION 


McPherson Jack A 


- 1 2 d4 
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Page No. 2 

06/ 1 7 / B 6 

LIST OF lR£W MEMBERS SORTED 
ON THOSE RANKS 



RANK 


SPECIALTY 


NAME 


SEKNO 


seaman 


COMMUNICATION 


Mallon Patrick F 


lies b 


SEAMAN 


NAVIGATION 


Markiey Daniel 1 


1 i SW1 


SEAMAN 


NAVIGATION 


Sansiven Dan K 


2 ! 1 ^ J J 


SEAMAN 


NAVIGATION 


Sestak Timothy W 


J 1 008 


SEAMAN 


NAVIGATION 


Shapiro Edwin W 


lljb'-j 


SEAMAN 


RADAR USER 


Weingarten Sam K 


L 1 Jtib 


SEAMAN 


SANITARY 


Tran Mike K 


1 1 4»/Jb 


SEAMAN 


SUPPLY 


Trend Ted M 


1 1 U J 


SEAMAN 


ENGINEER 


Unger Jell H 


1 1 4 wJ 8 


SEAMAN 


ENGINEER 


Russ Randy G 


.-140 1 


SEAMAN 


ENGINEER 


William Kotjert P 


11 4bb 


SEAMAN 


ENGINEER 


Beam Alan K 


11487 


SEAMAN 


ENGINEER 


Ed son Alan B 




SEAMAN 


ENGINEER 


Cava 1 mi Larry P 


1 -4 8 S S 


SEAMAN 


ENG I NEER 


flartyr Paul J 


1 4 b VJ fj 


SEAMAN 


ENGINEER 


K nub is James P 


J ’ J S' 


SEAMAN 


ENGINEER 


Kohn Robert H 


1 4 b JJ 1 


SEAMAN 


ENGINEER 


Sturgeon James K 


14bS.J 


SEAMAN 


ELECTRIC I AN 


Kett David G 


1 4 b 2? / 


SEAMAN 


ELECTRICIAN 


Getline Scott B 


2.4 b bb 


SEAMAN 


ELECTRICIAN 


Nikola Michael E 


iSOO 1 


SEAMAN 


ELECTRONIC 


Cline William R 


Lbb 1 0 


SEAMAN 


ELECTRONIC 


Sorensen Donald M 


bb 1 14 
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^age No. 1 

0b/ 17/ 8b 

LIST OF CHEW MEMBERS SORTED 



ON THOSE ENROLLMENT DATE 



IN Date name rank bPLuiALi* 



06/06/84 


Cone on Stephen J 


LIEUTENANT 




DECK 


06/22/84 


Armstrong David K 


SENIOR 


CHIEF 


PO 


RADAR U8EK 


07/03/84 


Nelan James H 


MASTER 


UHlEp 


PO 


WEAPON LUN 1 RUL 


07/18/84 


Lyon Arthur B 


LH I Eh' RU 




SUPPLY 


08/19/84 


Nezos Fred T 


MASTER 


CHIEF 


PO 


ELECTRICIAN 


12/01/84 


lilt Thomas C 


SEAMAN 






WEAPON U8ER 


12/03/84 


Edson Alan B 


SEAMAN 






ENGINEER 


12/08/84 


Russ Randy 0 


SEAMAN 






ENGINEER 


12/10/84 


Kohn Robert H 


SEAMAN 






ENGINEER 


12/12/84 


Kett David G 


SEAMAN 






ELECTRICIAN 


12/14/84 


Wemgarten Sam F 


SEAMAN 






RADAR UbER 


12/20/84 


Clark Andrews 1 


SEAMAN 






WEAPON CONTROL 


01/31/85 


Ervin Joseph H 


ENSIGN 






ENGINEER 


04/24/85 


Nicholson George R 


PO 1st 


CLASS 




NAVIGATION 


05/07/85 


Nikola Michael E 


SEAMAN 






ELECTRlLl AN 


05/ 11/85 


Little Fredenk J 


seaman 






WEAPON USER 


05/14/85 


Trend Ted M 


SEAMAN 






SUPPLY 


05/ 19/85 


Cavalini Larry F 


SEAMAN 






ENGINEER 


05/27/85 


McPherson Jack A 


SEAMAN 






CGMMUN1CA HUN 


08/ W5/85 


Sansiven Dan K 


SEAMAN 






NA V.LGAT 1UN 


06/09/85 


Miller Jacj T 


SEAMAN 






WEAPON USER 


06/ 16/85 


Hobson Aaron M 


PO 3rd 


CLASS 




ENGINEER 


06/ 18/85 


Ibel Peter J 


PO 2nd 


CLASS 




ELECTRONIC 


06/27/85 


Steevens James F 


PO 2nd 


CLASS 




WEAPON CONI RUL 


08/30/85 


Gorman Dennis H 


PO 1st 


CLASS 




ENGINEER 


07/ 10/85 


Tally Chris S 


LT. COMMANDER 


DECK 


07/11/85 


Bearn Alan K 


SEAMAN 






ENGINEER 


07/14/85 


Appel John G 


SENIOR 


CHIEF 


Pu 


ENGINEER 


07/17/85 


Emerson Burt F 


1st LIEUTENANT 


DECK 


07/18/85 


Flamini Charles D 


SEAMAN 






WEAPON USER 


07/19/85 


Newell Peet S 


MASTER 


CHIEF 


PO 


CUMMUNlUAT iUN 


07/21/85 


Norton Harold G 


Pu 2nd 


CLASS 




WEAPUN UbER 


07/25/85 


Rugg Bill b 


MAST 6 R 


CHIEF 


PU 


ELECTRONIC 


08/04/85 


Nezart Jerome G 


CHIEF . 


Pu 




RADAR USER 


08/19/85 


Quails Terry D 


SEAMAN 






WEAPUN USER 


08/24/85 


Mallon Patrick F 


SEAMAN 






UUMMUNICATiUN 


09/03/85 


Getlme Scott B 


SEAMAN 






electrician 


09/04/85 


Ertle Aaron P 


ENSIGN 






DECK 


09/06/85 


Clark James D 


SEAMAN 






WEAPUN CONTRUL 


09/17/85 


Martyr Paul J 


SEAMAN 






ENGINEER 



LERNU 



20 726 
2 0 7 S J 

20 / bb 
20808 

20 7 7 7 

208 lb 
24808 
2 i 4 O 1 
24801 
2488 / 

21 280 
20878 
20/08 
20818 
2200 i 
2084 8 

2142... 

2 4 8 8 w j 

21 284 
21 jj j 

20848 
20810 
2080 / 
208 0*- 
20831 

207 8 4 
21487 

20 / 84 
*-0 / 48 

208 30 
_ 0 7 7 2 
20840 
2 0/80 
20801 
20827 

21 288 
24888 
20750 
2087 2 
24800 
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Page No. 
Q6/ 17/ 8b 


2 

LIST Oh CREW MEMBERS 


SOW 1 ED 








ON THOSE ENROLLMENT 


DATE 


• 




IN DATE 


name rank 


SPECIAL IV 


bLKNU 



09/20/85 


Tran Mike K 


SEAMAN 




SANITARY 


21409 


09/24/85 


Shapiro Edwin W 


SEAMAN 




NAVIGATION 


Jb -J 


10/01/85 


Rarney Harold A 


PO 3rd 


CLASS 


C0MMUN1CA 11 Li N 




12/01/85 


Sturgeon James ft 


SEAMAN 




ENGINEER 


j t!> 


12/04/aS 


Clme William R 


SEAMAN 




ELECTRONIC 


. > i o 


12/17/85 


Armout Paul G 


SEAMAN 




CUMMUNICA i TUN 


i VJ ^ H 


01/18/88 


Pulk Richard (J 


SEAMAN 




WEAPON USER 


J Zy '-J ■ Co 


01/24/Bb 


biondi Daniel M 


SEAMAN 




WEAPUN CUN 1 rul 




01/31/88 


Quinn Daniel F 


PO 3rd 


CLASS' 


NAVIGATION 


2W9W1 


02/02/86 


Markley Daniel T 


SEAMAN 




NAVIGATION 




02/09/86 


Russo James D 


SENIOR 


CHIEF 


PO WEAPON USER 




02/ 16/8b 


Sestak Timotny W 


SEAMAN 




NAVIGATION 


-2. I _J Zj 


02/21/86 


William Robert P 


SEAMAN 




ENGINEER 


i ^ tub) 


02/28/86 


Jefferson Jack L 


ENSIGN 




DECK 




03/ 07 / 86 


Unger Jeff H 


SEAMAN 




ENGINEER 


L4jM 


03/ 11/tJb 


Isola Mike L 


PU 3rd 


Class 


WEAPON USER 


/ J 


04/01/Bb 


Knubis James P 


SEAMAN 




ENGINEER 




04/02/86 


Condon Tim N 


PO 1st 


CLASS 


ELECTRICIAN 




04/09/86 


Quick Gim G 


PO 3rd 


CLASS 


WEAPON CONTROL 


xL ZJ tS J ‘/ J 


04/ 14/bb 


Sorensen Donald M 


SEAMAN 




ELECTRONIC 


1 ^-4 


04/23/86 


Jaf lee Jay M 


LIEUTENANT 


ENGINEER 


7 4 I 


05 / 07 / 86 


Tngo Bum F 


CHIEF 


PQ 


SANITARY 


JWtiW / 


05/ 10 /ab 


Fogel Gregory B 


SEAMAN 




WEAPON CONTROL 


2-' tj to 
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Page No. 


1 






Wb/ 17/ 66 


LIST UF CREW MEMBERS SCRIED 








GN THOSE DISENRCLLMENT DATE 


* 




GUTDATE 


name Rank 


bPLLlAL i Y 


bLKNL) 



wa / 17/85 


Armout Paul G 


seaman 


COMMUNICATION 


21024 


08 / 01/86 


lilt Thomas C 


SEAMAN 


WEAPON USER 




08 / 03/86 


Edson Alan B 


SEAMAN 


ENGINEER 


J 4 b b 4 


06 / 06/88 


Russ Kandy G 


SEAMAN 


ENGiNEEK 


J J- 4 Zj 1 


08 / 10/66 


Kohn Robert H 


SEAMAN 


ENGINEER 


2 4 4 3 1 


06 / 12/86 


Kett David G 


SEAMAN 


ELECTRICIAN 


2444 / 


08 / 14/86 


Weingarten Sam F 


SEAMAN 


RADAR USER 


2 i 3bt> 


06 / 20/86 


Clark Andrews I 


SEAMAN 


WEAPUN control 


204 / a 


01 / 07/87 


Nikola Michael E 


6EAMAN 


ELECTRICIAN 


2 300 1 


01 / 11/87 


Little Fredenk J 


SEAMAN 


WEAPON USER 


2044 4 


01 / 14/87 


Trend Ted M 


SEAMAN 


SUPPLY 




01 / 13/87 


Cavalim Larry F 


SEAMAN 


ENGINEER 


24b43 


01 / 27/87 


McPherson Jack A 


SEAMAN 


CUMMUN 1 CAT 1UN 


21 2d 4 


02 / 05/87 


Sansiveri Dan K 


SEAMAN 


NAVIGATION 


2123 b 


02 / 09/87 


Miller Jacj T 


SEAMAN 


WEAPON USER 


2044b 


03 / 11/87 


Beam Alan K 


SEAMAN 


ENGINEER 


214b/ 


03 / 18/87 


Flamini Charles D 


SEAMAN 


WEAPON U'oER 


20450 


04 / 19/87 


Qualls Terry D 


SEAMAN 


WEAPON USER 


2 0 4 2 7 


04 / 24/87 


Mallon Patrick F 


SEAMAN 


COMMUNICATION 


>| U 1 1 

Li. ^.U > 


04 / 24/87 


Shapiro Edwin W 


SEAMAN 


NA V 1GAT1UN 


2 1 


05 / 03/67 


Getlme Scott B 


SEAMAN 


ELEC TRiCi AN 


2444b 


05 / 06/87 


Clark James D 


seaman 


WEAPON CONTROL 


204/ 2 


05 / 17/87 


Martyr Paul J 


SEAMAN 


ENGINEER 


^ </) e, 


05 / 20/67 


Tran Mike K 


SEAMAN 


sanitary 


2 1 4 i/i 4 


06 / 01/67 


Sturgeon James K 


SEAMAN 


engineer 


2 4 ‘4b 2 


06 / 04/87 


Cline William R 


SEAMAN 


ELECTRONIC 


2 3 0 1 b 


09 / 18/87 


Pulk Richard G 


SEAMAN 


WEAPON U6ER 


2043b 


03 / 24/87 


Biondi Daniel M 


SEAMAN 


WEAPON CONTRUL 


20443 


10 / 02/87 


Markley Daniel T 


SEAMAN 


NA V 1GAT 1-UN 


2 i 30 2 


10 / 16/87 


Sestak Timothy W 


SEAMAN 


NAVIGATION 


2 1 Jjb 


10 / 21/87 


William Robert P 


SEAMAN 


ENClNEER 


2 L 4 b b 


11 / 07/67 


Unger Jell H 


SEAMAN 


ENG I NEER 


2143b 


01 / 10/66 


Fogel Gregory B 


seaman 


WEAPON CONTROL 


204bb 


12 / 01/66 


Knubis James P 


SEAMAN 


ENGINEER 


24 424 


12 / 14/68 


Sorensen Donald M 


SEAMAN 


ELECTRONIC 


43 124 


/ 


/ 


Tally Chris S 


LT. COMMANDER 


DECK 


20/34 


/ 


/ 


Concon Stephen J 


LIEUTENANT 


DECK 


20 / .ib 


/ 


/ 


J at lee Jay M 


LIEUTENANT 


ENGINEER 


2074.1 


/ 


/ 


Emerson Burt F 


1st LIEUTENANT 


DECK 


20 / 44 


/ 


/ 


Ertle Aaron P 


ENSIGN 


DECK 


20/50 
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Page No. 2 

Ufa/ 17/Sfa 

LIST UP GREW MEMBERS SORTED 
ON THOSE DISENROLLMENT DATE 



GUTDATE 


NAME 


RANK 




SPECl ALT Y 


SlKNU 


/ 


/ 


Jefferson Jack L 


ENSIGN 






DECK 


JC'/SS 


/ 


/ 


Ervin Joseph H 


ENSIGN 






ENGINEER 


2U /tod 


/ 


/ 


Nelan James H 


MASTER 


CHIEF 


PG 


WEAPUN contrul 


2 J/b-J 


/ 


/ 


Newell Feet S 


MASTER 


CHIEF 


PU 


COMMUNiCATiUN 


/ / *. 


/ 


/ 


Nezos Fred T 


master 


CHIEF' 


PU 


ELECTRICIAN 


i C / V / 


/ 


/ 


Rugg Bill S 


MASTER 


CHIEF 


PG 


ELECTRONIC 




/ 


/ 


Russo James B 


SENIOR 


CHIEF 


PU 


WEAPON USER 


2U /1j 


/ 


/ 


Armstrong David K 


SENIOR 


CHIEF 


PU 


RADAR USER 


2U '/ biJ 


/ 


/ 


Appel John G 


SENIOR 


CHIEF 


PG 


ENGINEER 




/ 


/ 


Nezart Jerome G 


CHIEF 


PO 




radar User 


2 VJ d U I 


/ 


/ 


Tngo Bum F 


CHIEF 


PG 




SANITARY 


SCSI/) / 


/ 


/ 


Lyon Arthur B 


CHIEF 


PG 




SUPPLY 




/ 


/ ' 


Nicholson George R 


PO 1st 


CLASS 




NAVIGAl IUN 


SCSI s 


/ 


/ 


Gorman Dennis H 


PO 1st 


CLASS 




ENGINEER 


2UdSi 


/ 


/ 


Condon Tim N 


PO 1st 


CLASS 




ELECTRICIAN 


S C «S -4 C 


/ 


/ 


Norton Harold U 


PO 2nd 


CLASS 




WEAPUN USER 


L, 'i) ti J 


/ 


/ 


Steevens James F 


PO 2nd 


Class 




WEAPUN CONI RUL 


2 c y u i. 


/ 


/ 


Ibel Peter J 


PO 2nd 


CLASS 




ELECTRONIC 


iUdto/’ 


/ 


/ 


Isola Mike L 


PO 3rd 


CLASS 




WEAPUN USER 


/U87 J 


/ 


/ 


Quick Gim G 


PO 3rd 


CLASS 




WEAPON CONTROL 


/(Jti'iH'J 


/ 


/ 


Ramey Harold A 


PO 3rd 


CLASS 




COMMUNiCATiUN 




/ 


/ 


Quinn Daniel F 


PO 3rd 


CLASS 




NAV1GAT1UN 


SQSUl 


/ 


/ 


Hobson Aaron M 


PO 3rd 


CLASS 




ENGINEER 


2 US l i/J 
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Page No. 1 

06/ 17/86 

ALPHABETICAL LIST OF CREW MEMBERS 



WITH RANKS AND SPECIALTIES 



NAME 



RANK 



SPECIAL TV 



Appel John G 
Armout Paul G 
Armstrong David K 
Beam Alan K 
Bipndi Daniel M 
Cavalini Larry F 
Clark Andrews I 
Clark James D 
Cline William R 
Concon Stephen J 
Condon Tim N 
Edson Alan B 
Emerson Burt F 
Ertle Aaron P 
Ervin Joseph H 
Flammi Charles D 
Fogel Gregory B 
Getlme Scott B 
Gorman Dennis H 
Hodson Aaron M 
Ibel Peter J 
Hit Thomas C 
Isola Mike L 
Jaiiee Jay M 
Jelierson Jack L 
Kett David G 
Knubis James P 
Kohn Robert H 
Little Fredenk J 
Lyon Arthur B 
Mai Ion Patrick F 
Markley Daniel T 
Martyr Paul J 
McPherson Jack A 
Miller Jac] T 
Nelan James H 
Newell Peet S 
Nezart Jerome G 
Nezos Fred T 
Nicholson George 



SEN I UR CHIEF 
SEAMAN 

SENIOR CHIEF 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
LIEUTENANT 
PO 1st CLASS 
SEAMAN 
1st LIEUTENANT 
ENSIGN 
ENSIGN 
SEAMAN 
SEAMAN 
SEAMAN 

PO 1st CLASS 
PG 3rd CLASS 
PO 2nd CLASS 
SEAMAN 

PO 3rd CLASS 
LIEUTENANT 
ENSIGN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
CHIEF PO 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 

MASTER CHIEF 
MASTER CHIEF 
CHIEF PO 
MASTER CHIEF 
R PO 1st CLASS 



PO ENGINEER 

C0MMUN1CA iiU N 
PU RADAR USER 
ENGINEER 
WEAPUN CONTROL 
ENGINEER 
WEAPUN CUNTRUL 
WEAPON CUN i RUL 
ELECTRONIC 
DECK 

ELECTRICIAN 
ENGINEER 
DECK 
DECK 

ENGINEER 
WEAPON USER 
WEAPON CONTROL 
ELECTRiCI AN 
ENG I NEER 
ENGINEER 
ELECTRONIC 
WEAPON USER 
weapon user 
ENGINEER 
DECK 

ELECTRICIAN 
ENGINEER 
ENGINEER 
WEAPON USER 
SUPPLY 

COMMUNICATION 
NAVIGATION 
ENGINEER 
COMMUNICATION 
WEAPON USER 
PU WEAPUN CUNTRUL 
PO COMMUNICATION 
RADAR USER 
PO ELECTRICIAN 
NAVIGATION 
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Page No. 
0b/ 17/86 



2 



ALPHABETICAL L 1 SI UK CHEW MEMBERS 



WITH HANKS AND SPECIALTIES 



NAME RANK SPECIALTY 



Nikola Michael E 


SEAMAN 




ELECTRICIAN 


Norton Harold G 


PCJ 2nd 


Class 


wearun USER 


Pulk Richard G 


SEAMAN 




WEAPON USER 


Qualls Terry D 


SEAMAN 




WEAPON USER 


Quick Gim G 


PO 3rd 


CLASS 


WEAPON CONTROL 


Quinn Daniel F 


PQ 3rd 


CLAES 


NAVI OAT ION 


Ramey Harold A 


PU jrd 


CLASS 


COMMUNICATION 


Rugg Bill S 


MASTER 


CHIEF PU 


ELEC TRONIC 


Russ Randy G 


SEAMAN 




ENGINEER 


Russo James D 


SENIOR 


CHIEF PO 


WEAPON USER 


Sansiven Dan K 


SEAMAN 




NAVIGATION 


bestak Timothy W 


SEAMAN 




NAVI OAT ION 


bhapiro Edwin W 


seaman 




NAVIUATIUN 


Sorensen Donald M 


SEAMAN 




ELECTRONIC 


Steevens James F 


PO 2nd 


CLASS 


WEAPON CONTROL 


Sturgeon James K 


SEAMAN 




ENGINEER 


Tally Chris S 


LT. COMMANDER 


DECK 


Tran Mike K 


seaman 




SANITARY 


Trend Ted M 


SEAMAN 




SUPPLY 


Tngo Bum F 


CHIEF 


PCI 


SANITARY 


Unger Jeff H 


SEAMAN 




ENGINEER 


Wemgarten Sarn F 


SEAMAN 




RADAR USER 


William Robert P 


SEAMAN 




ENGI NEER 
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Page No. i 

08/ 17/86 

alphabetical Liar ur Chtw MEMBtKb 



WITH THOSE PHONE NUMBERS 



NAME PHONE NO 



Appel John G 


343-6781 


Arrnout Paul G 


648-04 bJ 


Armstrong David K 


J 73-6783 


Beam Alan K 


878-0903 


Biondi Daniel M 


375-5714 


Cavalini Larry F 


657-3321 


Clark Andrews i 


349-881 1 


Clark James D 


379-0876 


Cline William R 


688-5638 


Concon btepnen J 


348-8/84 


Condon Tim N 


372-8873 


tdson Alan B 


876-8304 


Emerson Burt F 


567-8895 


Ertle Aaron P 


373-4568 


Ervin Joseph H 


373-6023 


Flamini Charles D 


375-6801 


Fogel Gregory B 


836-7766 


Getline Scott B 


376-6328 


Gorman Dennis H 


388-9764 


HoDson Aaron M 


625-4383 


Ibel Peter J 


373-8486 


lilt Thomas C 


345-8785 


Isola Mike L 


333-6783 


Jaiiee Jay h 


632-3134 


Jeiierson Jack L 


658-9743 


Kett David G 


456-9862 


Knubis James P 


343-8903 


Kohn Robert H 


677-9991 


Little hredenk J 


374-8403 


Lyon Arthur B 


3 73-8/80 


ha lion Patrick F 


887 -7 850 


harkley Darnel T 


467-9970 


hartyr Paul J 


373-6789 


McPherson Jack A 


887-9852 


Miller Jacj T 


372-6402 


Nelan James H 


456-6/89 


Newell Peet S 


372-6402 


Nezart Jerome G 


7 3b - 9234 


Nezos Fred T 


375-8406 


Nicholson George R 


623-3238 
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Page- No. 2 

(2)6/ 17/86 

ALPHABETICAL LIST OF CREW MEMBERS 



WITH THOSE PHUNE NUN BLKB 



NAME 




PHONE NO 


Nikola Michael 


E 


445-5546 


Norton Harold G 




598-2366 


Pulk Richard G 




387-9653 


Qualls Ferry D 




623-3470 


Quick Gim G 




325-6764 


Quinn Daniel F 




345-6662 


Ramey Harold A 




373-6/56 


Rugg Bill b 




456-906/ 


Russ Randy G 




373-4866 


Russo James D 




546-5578 


Sansiven Dan K 




374-6581 


Sestak Timothy 


W 


546-7789 


Shapiro Edwin W 




345-6659 


Sorensen Donald 


M 


667-8760 


Steevens James 


F 


453-8342 


Sturgeon James 


K 


723-6413 


Tally Chris S 




565 -621/ 


Tran Mike K 




478-1234 


Trend Ted M 




373-6770 


Tngo Bum F 




373-4911 


Unger Jell H 




646-8764 


Weingarten bam 


F 


455-9965 


William Robert 


P 


346-8971 
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Page No. 1 

0b/ 1 V/86 

ALPHABETICAL LIST Uh CHEW MEMBERS 



WITH THOSE HONE ADDRESSES 



name hume address 



Appel John G 
Armout Paul G 
Armstrong David K 
Beam Alan K 
Biondi Daniel M 
Cavalini Larry F 
Clark Andrews I 
Clark James D 
Cline William R 
Concon Stephen J 
Condon Tim N 
Edson Alan B 
Emerson Burt F 
Ertle Aaron P 
Ervin Joseph H 
Flammi Charles D 
Fogel Gregory B 
G'etline Scott B 
Gorrnan Dennis H 
Hobson Aaron M 
ibel Peter J 
lilt Thomas C 
Isola Mike L 
Jaifee Jay M 
Jefferson Jack L 
Kett David G 
Knubis James P 
Kohn Robert H 
Little Fredenk J 
Lyon Arthur B 
Mallon Patrick F 
Mark ley Daniel T 
Martyr Paul J 
McPherson Jack A 
Miller Jacj T 
Nelan James H 
Newell Peet S 
Nezart Jerome G 
Nezos Fred T 
Nicholson George R 



15 


Diane 


Bon 


it a 


21 


Pme 


Ar orn 


as 


16 


Denis 


Car 


rnel 


24 


F r anklm 


Marina 


8b 


Monroe Ma 


r in a 


29 


Side 


Larm 


el 


43 


Pme 


Gt ay 





1 Acropolis Salimas 
90 Carmen Carmel 



44 


Pme Bon 


i ta 


60 


Smex Mo 


n terey 


88 


Castor S 


. J ose 


41 


9th- Free 


no 


2 J 


Camino M 


ar l na 


32 


Grove Monterey 


22 


Cannery 


Mon ter e 


36 


Coral Ca 


r mel 


13 


Vma Mon 


terey 


2 ; 


Franklin 


Fresno 


39 


Mam Sal 


1 mas 


31 


5th Mont 


erey 


8 . 


Acacia Sa 


linas 


99 


David S. 


Cruz 


10 


Paso San 


Diego 


11 


Forest S 


. Clara 


44 


Story S a 


1 1 m a s 


3 


14th Mont 


erey 


26 


Hawk Fresno 


53 


Vista Mo 


nterey 


lb 


Jacobs L 


ar mel 


49 


Scott S. 


J ose 


66 


Lake Mar 


l na 


25 


Dexter C 


ar mel 


12 


5th Cala 


veras 


44 


Buna Mon 


terey 


67 


Paso Salimas 


b0 


Desty Mo 


nterey 


14 


Fox Nest 


or 


19 


Franklin 


Marina 


18 


Elden Gi 


1 r oy 
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Page No. 2 

0b/ 17/86 

ALPHABETICAL LILT OF CREW MEMBERS 
WITH THOSE HU HE ADDRESSES 



NAME HUME ADDRESS 



Nikola Michael E 
Norton Harold G 
Pulk Richard G 
Qualls Terry D 
Quick Gim G 
Uuinn Daniel F 
Ramey Harold A 
Rugg Bill S 
Russ Randy G 
Russo James D 
Sa.nsiven Dan K 
Sestak Timothy W 
Shapiro Edwin W 
Sorensen Donald M 
Steevens James F 
Sturgeon James K 
Tally Chris S 
'Fran Mike K 
Trend Ted M 
Tngo Burn F 
Unger Jell H 
Wemgarten Sam F 
William Robert P 



26 Dolores s. Cruz 
37 Holman L. Gatos 
33 Ruska Reno 



65 Desty Moreno 

22 Maple Napa 

23 bth Aromas 



15 


Gro 


v e Monter 


e; 


66 


Car 


1 o s S . Jo 


s < 


21 


Ramona Carrne 


1 


77 


Hi 1 


Is S. Jose 


35 


Dia 


ne Monter 


e 


2 


Fox 


Los Gatos 




53 


bth 


Monterey 




27 


Ros 


1 1 1 a P. A 


1 


50 


Pm 


e Palo A 1 


ti 


63 


Low 


ell S . Jo 


s * 


3b0 Spencer Car 


m 


3 


Holm 


an S . C 1 a 


r 


93 


Gee 


an Monter 


e 


10 


Mou 


n Lam Car 


m 


38 


Da v 


id Monter 


e 


3 


River Salima 


s 


3 


Fart 


he non Car 


m 
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Page No. 

06/ 17/66 

ALPHABETICAL LIST OF CREW MEMBERS 



WITH THOSE ADDRESSES AND PHONES 



NAME 






HOME ADDRESS 


FHUNE NU 


Appel John G 




15 


Diane Bonita 


345-6761 


Arrnout Paul G 




21 


Pine Arornas 


646-0433 


Armstrong D avi 


d K 


lb 


Denis Carmel 


373-b /82 


Bearn Alan K 




24 


Franklin Marina 


b/6-0903 


Biondi Daniel 


M 


8b 


Monroe -Manna 


3/3-3714 


Cavalini Larry 


F 


29 


Side Carmel 


657-3321 


Clark Andrews 


1 


43 


Pme Gtay 


34b -tib 1 1 


Clark James D 




1 . 


Acropolis Salimas 


379-0876 


Cline William 


R 


90 


Carmen Carmel 


baa-5b58 


Concon Stephen 


J 


44 


Pme Bonita 


34b - 6/b4 


Condon Tim N 




b0 


Sinex Monterey 


372-9675 


Edson Alan B 




88 


Castor S. Jose 


876-9504 


Emerson Burt P 




41 


9th Fresno 


5b7 -6693 


Ertle Aaron P 




23 


Camino Marina 


373-45bb 


Ervin Joseph H 




32 


Grove Monterey 


J7J- b023 


Flammi Charles D 


22 


Cannery Monterey 


375-6901 


Fogel Gregory 


B 


36 


Coral Carrnel 


b5b - 77bb 


Getlme Scott 


B 


13 


Vina Monterey 


37 b - b328 


Gorman Dennis 


H 


2 


Franklin Fresno 


366-9764 


HoDson Aaron M 




39 


Mam Salimas 


b23-4363 


lDel Peter J 




31 


5th Monterey 


3/5-b4bb 


lilt Thomas C 




8 


Acacia Salmas 


345-6785 


I sola hike L 




99 


David S. Cruz 


333-6783 


Jallee Jay M 




10 


Paso San Diego 


632-3 1 34 


Jellerson Jack 


L 


11 


Forest S. Clara 


656-9/43 


Kett David G 




44 


Story Salimas 


456-9862 


hnubis James P 




3 


14th Monterey 


345-6905 


Kohn Robert H 




26 


Hawk Fresno 


677-9991 


Little Freden 


k J 


53 


Vista Monterey 


374-6403 


Lyon Arthur B 




16 


Jacobs Carrnel 


373-6760 


Nallon Patrick 


F 


49 


Scott S. Jose 


66/ -7630 


Markley Daniel 


T 


66 


Lake Manna 


4 b 7 - 9 9 7 0 


Martyr Paul J 




25 


Dexter Carrnel 


373-6769 


McPherson Jack 


A 


12 


5th Calaveras 


687 - 9652 


Miller Jacj T 




44 


Buna Monterey 


372-6402 


Nelan James H 




67 


Paso Salimas 


45b-b789 


Newell Peet S 




60 


Desty Monterey 


372-6402 


Nezart Jerome 


G 


14 


Fox Nestor 


756-9234 


Nezos Fred T 




19 


Franklin Manna 


375-6406 


Nicholson Geor 


ge R 


18 


Elden Gilroy 


623-3226 
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Page No. 2 

06/17/86 

ALPHABETICAL LIST Oh CREW MEMBERS 



WITH THOSE ADDRESSES AND PHONES 



NAME HOME ADDRESS PHONE NO 



Nikola Michael E 


2b 


Dolores S. Cruz; 


445-5546 


Norton Harold G 


37 


Holman L. Gatos 


868-2866 


Pulk Richard G 


33 


Ruska Reno 


387-9653 


Qualls Terry D 


65 


D e s t y Moreno 


623-3476 


Quick Gim U 


22 


Maple Napa 


325-8/64 


Quinn Daniel F 


29 


6th Aromas 


845-6682 


Ramey Harold A 


15 


Grove Monterey 


373-6/58 


Rugg Bill S 


bb 


Carlos S. Jose 


456-9087 


Russ Randy G 


21 


Ramona Carmel 


373-4866 


Russo James D 


77 


Hills S. Jose 


546-55/8 


Sansiven Dan K 


35 


Diane Monterey 


374-6581 


Sestak Timothy W 


2 _ 


Fox Los Gatos 


546-7789 


Shapiro Edwin W 


53 


8th Monterey 


345-8859 


Sorensen Donald M 


27 


Rositta P. Alto 


687-8760 


Steevens James F 


50 


Pine Palo Alto 


453-88'i2 


Sturgeon James K 


69 


Lowell S. Jose 


723-64 1 3 


Tally Chris 5 


360 Spencer Carmel 


585-621 / 


Tran Mike K 


9 


Hof man S. Clara 


4/8-1234 


Trend Ted M 


93 


Ocean Monterey 


373-6770 


Tngo Bum F 


10 


Mountain Carmel 


3 73-4911 


Unger Jeff H 


38 


David Monterey 


646 - 87 64 


Weingarten Sam F 


3 


River Salimas 


455-9985 


William Robert F 


3 


Parthenon Carmel 


348-897 1 
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06/ 17/86 

DEPARTMENT : 



SUPERVISOR : 



name 


SERNU 


RANK 




bPhCiAL T I 


D L P A 


Tally Chris S 


20734 


LT. COMMANDER 




DECK 


DECK 


Concon Stephen J 


20736 


LIEUTENANT 




DECK 


DECK 


Emerson Burt F 


207 46 


1st LIEUTENANT 


DECK 


DECK 


Ertle Aaron P 


20750 


ENSIGN 






DECK 


DECK 


Jefferson Jack L 


20756 


ENSIGN 






DECK 


DECK 


Nelan James H 


20766 


MASTER 


CHIEF 


PO 


WEAFUN CONTRUL 


Deck 


Newell Peet S 


20772 


MASTER 


CHIEF 


PO 


CUMMUNiCA Cl UN 


DECK 


Russo James D 


20765 


SbNiuR 


CHIEF 


PU 


WEAFUN U6EK 


DECK 


Armstrong David K 


20763 


SENIOR 


CHIEF 


PO 


radar user 


DECK 


Nezart Jerome G 


20601 


CHIEF . 


PO 




radar user 


DECK 


Tngo Bum F 


20607 


CHIEF 


PO 




SANITARY 


DECK 


Lyon Arthur B 


20606 


CHIEF 


PO 




bUPPLY 


DECK 


Nicholson George R 


20819 


PO 1st 


CLASS 




NAVIGATION 


DECK 


Norton Harold G 


20645 


PO 2nd 


CLASS 




WEAPON USER 


DECK 


Steevens James F 


20852 


PG 2nd 


CLASS 




WEAFUN CONTROL 


Deck 


Isola Mike L 


20873 


PO 3rd 


CLASS 




WEAFUN U6EK 


DECK 


Quick Girn G 


20660 


PO 3rd 


CLASS * 




WEAFUN CONTROL 


DECK 


Ramey Harold A 


20892 


PO 3rd 


CLASS 




COMMUNICATION 


DECK 


Quinn Daniel F 


20901 


PO 3rd 


CLAbb 




NAVIGATION 


DECK 


lilt Thomas C 


20916 


seaman 






WEAFUN USER 


DECK 


Qualls Terry D 


20927 


SEAMAN 






WEAFUN USER 


DECK 


Pulk Richard G 


20936 


SEAMAN 






WEAPON USER 


DECK 


Miller Jacj T 


20948 


SEAMAN 






WEAFUN U6ER 


deck 


Little Fredenk J 


20949 


SEAMAN 






WEAFUN USER 


DECK 


Flamini Charles D 


20650 


SEAMAN 






WEAFUN U8EK 


DECK 


Fogel Gregory B 


20966 


SEAMAN 






WEAPON CONTROL 


DECK 


Clark James D 


20972 


SEAMAN 






WEAPON CONTROL 


DECK 


Clark Andrews I 


20978 


SEAMAN 






WEAPON CONTRUL 


DECK 


Biondi Daniel M 


20665 


SEAMAN 






WEAFUN LUNTRUL 


DECK 


Armout Paul G 


21024 


SEAMAN 






COMMUNICATION 


DECK 


McPherson Jack A 


21284 


SEAMAN 






COMMUNICATION 


DECK 


Mallon Patrick F 


21289 


SEAMAN 






COMMUNICATION 


DECK 


Markley Daniel T 


21302 


SEAMAN 






NA V IGATlUN 


DECK 


Sansiven Dan K 


21335 


SEAMAN 






NAVIGATION 


DECK 


Sestak Timothy W 


21358 


SEAMAN 






NAVIGATION 


DECK 


Shapiro Edwin W 


21366 


SEAMAN 






NAVIGATION 


DECK 


Wemgarten Sam F 


21386 


SEAMAN 






RADAR USER 


DECK 


Tran Mike K 


21406 


SEAMAN 






SANITARY 


DECK 


Trend Ted M 


21423 


SEAMAN 






SUPPLY 


DECK 
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Page No. 1 

Ub/ 17 /8b 

DEPARTMENT : 



SUPERVISOR : 



NAME 


SERNO 


RANK 




SPECIAL! * 


DhPAKlTlJ 


J at lee Jay M 


20741 


LIEUTENANT 




ENU1NEER 


MACH1 Nfc 


Ervin Joseph H 


20768 


ENSIGN 






ENGINEER 


MACH I NL 


Nezos Fred T 


20777 


MASTER 


CHIEF 


PU 


ELECTRiCl AN 


MACH INt 


ftugg dill S 


20780 


M A S T E K 


CHIEF 


PG 


ELECTRON 1U 


MACH 1 Nt. 


Appel John G 


E0794 


SENIOR 


CHIEF 


PU 


ENGINEER 


MACH IMP 


Gorrnan Dennis H 


20831 


PO 1st 


CLASS 




ENGINEER 


MACH L NC 


Condon Tim N 


20840 


PU 1st 


CLASS 




ELECTRICIAN 


NAChiNc 


I del Peter J 


20SS7 


PO 2nd 


CLASS 




ELECTRONIC 


M AChiNh 


Hobson Aaron fl 


20910 


PU 3rd 


CLASS 




ENGINEER 


MACH INC 


Unger Jetf H 


21438 


SEAMAN 






ENGINEER 


M A C H 1 h C 


Russ Randy G 


21451 


SEAMAN 






ENGINEER 


MAChlNP 


William "Robert P 


'2146b 


SEAMAN 






ENG I N E ER 


MACH i N l 


Beam Alan K 


21487 


SEAMAN 






ENGINEER 


flACHlNh 


Edson Alan 6 


24869 


SEAMAN 






ENGINEER 


M A C H 1 N L 


Cavalini Larry F 


24893 


SEAMAN 






ENGINEER 


Mach l N t 


Martyr Paul J 


2490b 


SEAMAN 






ENGINEER 


NAcHINh 


hnudis James P 


24929 


SEAMAN 






ENGINEER 


llAUiiNh 


Kohn Robert H 


24951 


SEAMAN 






ENGINEER 


MACH1NL 


Sturgeon James K 


24983 


SEAMAN 






ENGINEER 


MACH INC 


hett David G 


24997 


SEAMAN 






ELECTRICIAN 


MACH ± N P 


Uetlme bcott B 


2499b 


SEAMAN 






ELECTRICIAN 


MACHlNt 


Nikola Michael E 


25001 


SEAMAN 






ELECTRICIAN 


MACH INC 


Cline William R 


25016 


SEAMAN 






ELECTRONIC 


MACH iNh 


Sorensen Donald M 


95124 


seaman 






ELECTRONIC 


MACH i Nt 
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Page No. 1 

06/17/66 

SUBDEPARTMENT : 





SUPERVISOR : . . . 






NAME 


SERNO RANK 


SPECIALTY 


SUBDSPAh 1 1*1 



Nelan James H 


20769 


ft ASTER 


CHIEF 


PO 


WEAPON 


CONTROL 


CUP1BA 1 


1 N t- U 


Armstrong David K 


20793 


SENIOR 


CHIEF 


PO 


RADAR 


USER 


COMBAT 


1 NT U 


Nezart Jerome G 


20601 


CHIEF 


PU 




RADAR 


USSR 


COM BA I 


INi'U 


Steevens James F 


20652 


PG 2nd 


CLASS 




WEAPON 


CONTROL 


COMBAT 


1NFU 


Quick Gim G 


20690 


PO 3rd 


CLASS 




WEAPON 


CON'l'ROL 


COM BA T 


INF O 


Fogel Gregory B 


20966 


SEAMAN 






WEAPON 


CONTROL 


COM BA T 


i N 1* U 


Clark James D 


209/2 


SEAMAN 






WEAPUN 


CUN 1 RUL 


COM BA 1 


1 N t- O 


Clark Andrews I 


20976 


SEAMAN 






WEAPON 


CONTROL 


COMBAT 


i Nr !J 


Biondi Daniel M 


20995 


SEAMAN 






WEAPON 


CONTROL 


COMBA 1 


i N h U 


Weingarten bam F 


21366 


SEAMAN 






RADAR 


USER 


CUM BA I 


i Nr O 
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Page No. l 

Ufa/ 17/8S 



NAflE 



Newell Feet S 
Ramey Harold A 
Armout Paul G 
McPMerson Jack A 
rialion Patrick P" 



SUBDEPAHTMENT : 

SUPERVISOR : 

SERNO RANK SPECIALTY SUbLit.FAR'l ntin 1 



20772 MASTER CHIEF 
20892 PO 3rd CLASS 
21024 SEAMAN 
21284 SEAMAN 
21289 SEAMAN 



FO COMMUNICATION 
COMMUNICATION 
COMMUNICATION 
CUMMUNICA I 1UN 
COMMUNICATION 



CUMMUNICA 1'iONS 
COMMUN 1C A 1 1UN8 
COMMUNi CA'l LUN8 
CUMMUNICA i lUto 
CUM MUNlCATiONS 
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Page No. 
0o/ 17/8b 



1 



NAME 



Nicholson George 
Uuinn Daniel F 
Markley Daniel T 
Sansiven Dan K 
Sestak Timothy W 
Shapiro Edwin W 



bUBDEPARTMEN T : 

bUPEttVibOR : 

SERNO RANK bPECl ALT Y bUbUEPAR 1 



20819 PG 1st CLASS 
20901 PG 3rd CLASS 
21302 SEAMAN 
21335 SEAMAN 
21358 SEAMAN 
21369 SEAMAN 



NAV1GAT1GN 
NAVIGATIGN 
NAV iUATICN 
NAVIGATIGN 
NAVIGATION 

navigation 



NAVibAliUN 
NAVlbAI 1 UN 
NAV IGA i J. UN 
NAV 1GAT1UN 
NAVIGATIGN 
navigation 



Mc.NI' 
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0b/ 17/86 


SUBDEPARTMENT : . . . 








SUPER V ISQR : . . . 






name 


serng Rank 


SPEC I ALT'Y 


subdep 



Russo James D 




20785 


SENIOR 


CHIEF PO 


WEAPON 


USER 


WEAPONS 


Norton Harold G 




20845 


PO 2nd 


CLASS 


WEAPON 


USER 


WEAPONS 


Isola (like L 




20873 


PO 3rd 


Class 


WEAPON 


USER 


WEAPONS 


Hit 5 Thomas C 




20S lfa 


SEAMAN 




WEAPON 


USER 


WEAPUNb 


Qualls Terry D 




20927 


SEAMAN 




WEAPON 


USER 


WEAPONS 


Pulk Richard G 




2093b 


SEAMAN 




WEAPON 


USER 


WEAPONS 


Miller Jacj T 




20948 


SEAMAN 




WEAPON 


USER 


WEAPUNS 


Little Fredenk 


J 


20949 


SEAMAN 




WEAPON 


USER 


WbAPUNb 


Flamini Charles 


D 


20950 


SEAMAN 




WEAPON 


USER 


WEAPONS 
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Page No. 1 

06/ 17/86 

SUBDEPART MEN T : 



SUPER V ISUft 



NAME 




SERNU 


RANK 


SPEC1 ALT Y 


bUbULPAK 1 MhN l 


Nezos Fred 


T 


20777 


MASTER 


CHIEF 


PO ELECTRICIAN 


ELECTRIC 


INC 1 AL 


Condon Tim 


N 


20840 


PO 1st 


CLASS 


ELECTRICIAN 


ELEC'I RlO 


INC i AL 


Kett David 


G 


24967 


SEAMAN 




ELECTRICIAN 


ELECTRIC 


INC 1 AL 


Getline Scott B 


24998 


SEAMAN 




ELECTRICIAN 


ELECTRIC 


INS 1 AL 


Nikola Michael E 


2C001 


SEAMAN 




ELECTRICIAN 


ELECTRIC 


INC 1 A L 
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Page No. 1 

Ub/ 17/ 80 

SUBDEPARTMENT : 



SUPERVISOR : 

NAME SERNG RANK SPECIALTY SUBDepar 



Rugg Bill S 
Ibel Peter J 
Cline William k 
S orensen Donald M 



20780 MASTER CHIEF PG ELECTRONIC 
20867 PO 2nd CLASS ELECTRONIC 
25016 SEAMAN ELECTRONIC 
95124 SEAMAN ELECTRONIC 



ELECTRON 
ELECTRON 
ELEC'i RUN 
ELEC ! R UN 



1 MEN I 



EWU1PM 
EUU1 PM 
ECU 1 PM 
ECU 1PM 
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Page No. 1 

0b/ 17/8b 

SUBDEPAKTMEN T : 
SUPERVISOR : 



NAME 




SERNU 


RANK 


SPECIALTY 


SUBUhBAK 1 MON 


Jaiiee Jay M 




2(2)741 


LIEUTENANT 


ENGINEER 


MAIN 


ENG 1 N ES 


Ervin Joseph H 




207 S8 


ENSIGN 




ENGINEER 


MAIN 


ENG 1 Nhb 


Appel John G 




20794 


SENIOR 


CHIEF 


PC ENGINEER 


MAIN 


LNblNbb 


Gorman Dennis H 




20831 


PO 1st 


CLASS 


ENGINEER 


MAIN 


E N G 1 N E b 


Hobson Aaron M 




20910 


PO 3rd 


CLASS 


ENGINEER 


MAIN 


ENG i N Eb 


Unger Jell H 




21438 


SEAMAN 




ENGINEER 


MAIN 


ENG 1 N Eb 


Russ Randy G 




21431 


SEAMAN 




ENGINEER 


MAIN 


ENGlNEb 


William Robert 


P 


2 1 4Sb 


SEAMAN 




ENGINEER 


MAIN 


engines 


Beam Alan K 




21487 


SEAMAN 




ENGINEER 


MAIN 


E N G I N E b 


Edaon Alan B 




24oS9 


SEAMAN 




ENGINEER 


MAIN 


ENGINES 


Cavalmi Larry 


K 


24093 


SEAMAN 




ENGINEER 


MAIN 


ENGINES 


Martyr Paul J 




2490b 


SEAMAN 




ENGINEER 


MAIN 


ENGlNEb 


Knubis James P 




24929 


SEAMAN 




ENGINEER 


MAIN 


E N G I N E S 


Kohn Robert H 




24931 


SEAMAN 




ENGINEER 


main 


ENGlNEb 


Sturgeon James 


K 


24903 


SEAMAN 




ENGINEER 


MAIN 


ENGINES 
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0b/ 17/86 

CREW ALLOCATION INTu TWO SHIFTS 



( SHIFT "A" ) 



name 



rank 



SPEC i AL I'Y 



Tally Chris S 


LT. CUNMANDER 




DECK 


Emerson Burt F 


1st LIEUTENANT 


deck 


Jelierson Jack L 


ENSIGN 






DECK 


Nor ton Harold G 


FO 2nd 


CLASS 




WEAPUN USER 


lilt Thomas C 


SEAMAN 






weapun USER 


Pulk Kichard G 


SEAMAN 






WEAPUN USER 


Little fredenk J 


SEAMAN 






WEAPON USER 


Nelan James H 


MASTER 


CHIEF 


PO 


WEAPUN CUNTKUL 


Quick Gim G 


PO 3rd 


CLASS 




WEAPUN CUNTKUL 


Clark James D 


SEAMAN 






WEAPUN CUNI RUL 


Biondi Daniel M 


SEAMAN 






WEAPUN CUNTKUL 


Ramey Harold A 


PO 3rd 


CLASS 




COMMUN I CAT 1 UN 


McPherson Jack A 


SEAMAN 






COMMUNICATION 


Nicholson George R 


PO 1st 


CLASS 




NAVIGATION 


flarkley Daniel T 


SEAMAN 






NaVIGAT 1UN 


Sestak Timothy W 


SEAMAN 






NA V1GAT1UN 


Armstrong David K 


SENIUR 


CHIEF 


PU 


RADAR USER 


Weingarten Sam F 


SEAMAN 






RADAR USER 


Tran Nike K 


SEAMAN 






SANITARY 


Trend Ted N 


SEAMAN 






SUPPLY 


Ervin Joseph H 


ENSIGN 






ENGINEER 


Gorman Dennis H 


PO 1st 


CLASS 




ENGINEER 


Unger Jell H 


SEAMAN 






ENGINEER 


William Robert H 


SEAMAN 






ENGINEER 


Edson Alan B 


SEAMAN 






ENGINEER 


Martyr Paul J 


SEAMAN 






ENGI neer 


Korm Robert H 


SEAMAN 






ENG 1 NEER 


Nezos Fred T 


MASTER 


CHIEF 


Pi) 


ELECTRICIAN 


Kett David G 


SEAMAN 






ELECT RICIAN 


Nikola Nichael E 


SEAMAN 






ELECTRICIAN 


Ibel Peter J 


PO 2nd 


CLASS 




ELECTRONIC 


Sorensen Donald N 


SEAMAN 






ELECT RUNIC 
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Page No. 1 

06/ 17/Bb 

CREW ALLUCA 1 1 ON 1 NTU 1'WU bHlKTb 



( SHIFT "B rt ) 



NAME 



RANK SPECIALTY 



Concon Stephen J 
Ernie Aaron P 
Russo James D 
Isola Mike L 
Qualls Terry D 
Miller Jacj T 
Flamini Charles D 
Steevens James F 
Fogel Gregory B 
Clark Andrews I 
Newell Peet S 
Armout Paul G 
Mallon Patrick F 
Quinn Daniel F 
Sansiven Dan K 
Shapiro Edwin W 
Nezart Jerome G 
Tngo Bum F 
Lyon Arthur B 
Jat'I'ee Jay M 
Appel John G 
Hobson Aaron M 
Russ Randy G 
Beam Alan K 
Cavalini Larry F 
Knubis James P 
Sturgeon James K 
Condon Tim N 
Getlme Scott B 
Rugg Bill S 
Cline William R 



LIEUTENANT 
ENSIGN 

SENIOR CHIEF 
PO 3rd CLASS 
SEAMAN 
SEAMAN 
SEAMAN 

PU 2nd CLASS 
SEAMAN 
SEAMAN 

MASTER CHIEF 
SEAMAN 
SEAMAN 

PO 3rd CLASS 
SEAMAN 
SEAMAN 
CHIEF PO 
CHIEF PO 
CHIEF PU 
LIEUTENANT 
SENIOR CHIEF 
PO 3rd CLASS 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 

PO let CLASS 
SEAMAN 
MASTER CHIEF PO 
SEAMAN 



DECK 

DECK 

PO WEAPON USER 
WEAPON USER 
WEAPON USER 
WEAPON USER 
WEAPUN USER 
WEAPUN CONTROL 
WEAPON CONTROL 
WEAPON CONTROL 
PO COMMUNICATION 
COMMUNICATION 
COMMUNICATION 
NAVIGATION 
NAVIGATION 
NAVIGATION 

radar user 

SANITARY 
SUPPLY 
ENGINEER 
PO ENGINEER 
ENGINEER 
ENGINEER 
ENGINEER 
ENGINEER 
ENGINEER 
ENGINEER 
ELECTRICIAN 
ELECTRICIAN 
ELECTRONIC 
ELECTRONIC 
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Page No. 1 

06/17/ 86 

CREW ALLOCATION INTO THREE SHIFTS 



( SHIFT "A" ) 



NAME 



RANK 



SPECIALTY 



Tally Chris S 
Ertle Aaron P 
Norton Harold G 
Qualls Terry D 
Little Fredenk J 
Steevens James F 
Clark James D 
Newell Peet S 
flcPherson Jack A 
Quinn Daniel F 
Sestak Timothy W 
Nezart Jerome G 
Tran Nike K 
Jaflee Jay N 
Gorman Dennis H 
Russ Randy G 
Edson Alan B 
Knubis James P 
Nezos Fred T 
Getlme Scott B 
Ibel Peter J 



LT. CONNANDER 
ENSIGN 

PG 2nd CLASS 

SEANAN 

SEANAN 

PU 2nd CLASS 
SEANAN 

NASTER CHIEF PG 
SEANAN 

PG 3rd CLASS 

SEANAN 

CHIEF PG 

SEANAN 

LIEUTENANT 

PG 1st CLASS 

SEANAN 

SEANAN 

SEANAN 

NASTER CHIEF PG 
SEANAN 

PG 2nd CLASS 



DECK 

DECK 

WEAPON USER 

WEAPUN USER 

WEAPON USER 

WEAPUN CONTROL 

WEAPON CONTROL 

COMMUNICATION 

COMMUNICATION 

NAVIGATION 

NAVIGATION 

RADAR USER 

SANITARY 

ENGINEER 

ENGINEER 

ENGINEER 

ENGINEER 

ENGINEER 

ELECTRICIAN 

ELECTRICIAN 

ELECTRONIC 
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Page No. 
Ob/ 17/fcSb 



1 



CHEW ALLOCATION INTO THKLL SHIFTS 







( SHIFT "B" ) 


II 

II 

II 

II 

II 

II 

II 

II 

II 

II 


NAME 




RANK 


SPECIAL TV 


Concon Stephen 


J 


LIEUTENANT 


DECK 


Jeflerson Jack 


L 


ENSIGN 


DECK 


Isola hike L 




PO 3rd CLASS 


WEAPON USER 


Pulk Richard G 




SEAMAN 


WEAPON USER 


Flamini Charles 


D 


SEAMAN 


WEAPON USER 


Uuick Gim G 




PO 3rd CLASS 


WEAPON CONi’RUL 


Clark Andrews I 




SEAMAN 


WEAPON CONTROL 


Ramey Harold A 




PO 3rd CLASS 


COMMUNICATION 


ballon Patrick 


F 


SEAMAN 


COMMUNICATION 


Markley Daniel 


T 


SEAMAN 


NAVIGATION 


Shapiro Edwin W 




SEAMAN 


NAVIGATION 


Weingarten Sam 


F 


seaman 


RADAR USER 


Lyon Arthur B 




CHIEF PO 


SUPPLY 


Ervin Joseph H 




ENSIGN 


ENGINEER 


Hobson Aaron M 




PO 3rd CLASS 


ENGINEER 


William Robert 


P 


SEAMAN 


ENGINEER 


Cavalim Larry 


F 


SEAMAN 


ENGINEER 


Konn Robert H 




SEAMAN 


ENG1 NHER 


Condon Tim N 




PO 1st CLASS 


electrician 


Nikola Michael 


E 


SEAMAN 


ELECTRICIAN 


Cline William R 




SEAMAN 


ELECTRONIC 
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Page No. 1 

06/17/86 

CR£W ALLUlaTIuN IN l U THREE 6H 1 FTS 



< SHIFT "C" ) 



NAME 



RANK SPECIALTY 



Emerson Burt F 
Russo James 0 
lilt Thomas C 
Milier Jacj T 
Nelan James H 
Fogel Gregory B 
Biondi Daniel M 
Armout Paul Li 
Nicholson George R 
Sansiven Dan K 
Armstrong David K 
Trigo Bum F 
Trend Ted M 
Appel John G 
Ungei' Jell H 
Beam Alan K 
Martyr Paul J 
Sturgeon James K 
Kett David G 
Rugg Bill S 
Sorensen Donald M 



1st LIEUTENANT 
SENIOR CHIEF PO 
SEAMAN 
SEAMAN 

MASTER CHIEF PO 

SEAMAN 

SEAMAN 

SEAMAN 

PG 1st CLASS 
SEAMAN 

SENIOR CHIEF PO 
CHIEF PU 



DtCk 

WEAPON user 
WEAPUN USER 
WEAPUN USER 
WEAPON CONTROL 
WEAPON CONTRUL 
WEAPUN LUNTRUL 
COMMUNICATION 
NAVIGATION 
NAVIGATION 
RADAR USER 
SANITARY 



SEAMAN 

SENIOR CHIEF 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 

MASTER CHIEF 
SEAMAN 



SUPPLY 

ENGINEER 

ENGINEER 

ENGINEER 

ENGINEER 

ENGINEER 

ELEC! RICIAN 

ELECTRON XL 

ELECTRONIC 
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Page No. 1 

06/17/86 

SHIP ORbANIZATiuN DURING 6URFALE ALERT 



DESCRIPTION NAME UP CREW MEMB. RANK 



COMMAND OFFICER 


Tally 


Chris S 






NAVIGATOR 


Er t le 


Aaron P 






navig. radar 


Weinga 


rten Sa 


m 


F 


HELMSMAN 


Nichol 


son Geo 


rg 


e R 


HF BRIDGE COMM. 


Ramey 


Harold 


A 




UHF BRIDGE COMM 


Armout 


Paul G 






LEFT OBSERVER 


flar kle 


y Dame 


1 


T 


RIGHT OBSERVER 


Sansiv 


eri Dan 


K 




CIC SUPERVISOR 


Concon 


S tephe 


n 


J 


AIR RADAR 


Nezart 


Jerome 


G 




surface radar 


Ar mstr 


ong Dav 


id 


K 


track radar 


Quick 


Gim G 






CIL COMMUNICAT. 


Lyon A 


rthur B 






CENTR WEAP CONT 


Emerso 


n Burt 


F 




GUN 31 CONSOLE 


Norton 


Harold 


G 




31 AMMO SUPPL1 


Hit Thomas C 






GUN 32 CONSOLE 


Russo 


James D 






32 AMMO SUPPL1 


Qualls 


Terry 


D 




GUN 33 CONSOLE 


isola 


Hike L 






33 AMMO SUPPL1 


Hulk R 


ichard 


G 




TURPEDO TUBE 1 


Kogel 


Gregory 


B 




TORPEDO TUBE 2 


Clark 


James D 






SS MISSILES 1 


Clark 


Andrews 


I 




TELETYPE 1 


Newell 


Pee t S 






TELETYPE 2 


McPner 


son Jac 


k 


A 


HI' CUMMUNICAT 


Mallon 


Patr ic 


k 


F 


SURG ROOM SUPER 


Tr igo 


Bum F 






SURG ROOM 1 


Tran N 


ike K 






ENG CONTR ROOM 


Jaiiee 


J ay n 






MAIN ENG 1 ASS 1 


Gorman 


Dennis 


H 




MAIN ENG1 ASS2 


Unger 


Jeff H 






MAIN ENG2 ASS 1 


Hobson 


Aaron 


n 




MAIN ENG2 ASS2 


Russ R 


andy G 






ELECTR generati 


Kett 0 


avid U 






ELECTR GENERAT2 


Get 1 m 


e Scott 


B 




ELECTR GENERAT3 


Nikola 


Michae 


1 


E 


DISTR TABLE 1 


Nezos 


Fred T 






distr table 2 


Condon 


Tim N 






DAMAGE CONTRUL1 


Ervin 


Joseph 


H 




DAMAGE C0NTR0L2 


Appel 


John G 






DAMAGE CONTROLS 


Quinn 


Daniel 


F 




RADIO ROOM SUP 


Jeiier 


son Jac 


k 


L 



LT. COMMANDER 
ENSIGN 



seaman 

PO 1st CLASS 
PO 3rd CLASS 
seaman 

SEAMAN 

SEAMAN 

LIEUTENANT 

CHIEF PD 

SENIOR CHIEF PO 

PO 3rd CLASS 

CHIEF PO 

1st LIEUTENANT 

PO 2nd CLASS 

SEAMAN 

SEN 1 UR LHiEF PO 
SEAMAN 

PO 3rd CLASS 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 

MASTER CHIEF PU 

SEAMAN 

SEAMAN 

CHIEF PO 

SEAMAN 

LIEUTENANT 

PO 1st CLASS 

SEAMAN 

PO 3rd CLASS 
SEAMAN 



SEAMAN 



SEAMAN 

SEAMAN 

MASTER CHIEF PO 
PO 1st CLASS 



ENSIGN 

SENIOR CHIEF PO 
PO 3rd CLASS 
ENSIGN 



SPLL1 AL I Y 



DECK 

DECK 

RADAR USER 
NAVIGATION 
COMMUNICATION 

communica iiun 

NAV lGA'flUN 
NAV 1GAT1UN 
DECK 

RADAR USER 
RADAR USc.h' 
WEAPUN CON'iRUL 
SUPPLY 
DECK 

WEAPUN UStn 
WEAPUN USSR 
WEAPUN USER 
WEAPON USER 
WLAPUN USSR 
WEAPUN US Eh' 
WEAPUN CON 1 hUL 
WEAPON CONTROL 
WEAPON CGNTRLL 
COMMUNICA I ION 
LUMMUN1LA I 1UN 
COMMUNICATION 
SANITARY 
sanitary 
engineer 

ENGINEER 

ENGINEER 

ENGINEER 

ENGINEER 

ELECTRIC IAN 

ELECTRICIAN 

ELECTRICIAN 

Electrician 

electrician 

ENGINEER 

ENGINEER 

NAVIGATIUN 

DECK 
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Page No. 
Ob/ 1 ?/Sb 



SHIP URBANIZATION DURING SURFACE ALERT 



DESCRIPTION NAME OF CREW MEMB. RANt\ 



SPECIAL Tt 



ESN 

ECM 

31 AMMO SUPPL2 

32 AMMU SUPPL2 

33 AMMO SUPPL2 
SS MISS CONTR 
SS MISS TELEPH 
SS MISSILES 2 
SURG R00M2 
SURG RUGM3 
DAMAGE C0NTR0L4 

damage controls 
damage controls 

DAMAGE CONTROL? 
DAMAGE CONTROLS 



Nelan James H 
Rugg Bill S 
Steevens James F 
ibel Peter J 
Miller Jacj T 
Little Fredenk J 
Flamini Charles D 
Biondi Daniel M 
Sestak Timothy W 
Shapiro Edwin W 
Trend Ted M 
William Robert P 
Beam Alan K 
Edson Alan B 
C aval ini Larry F 



MASTER CHI Eh PU 
MASTER CHIEF PO 
PO 2nd CLASS 
PQ 2nd CLASS 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 
SEAMAN 



WEAPUN CUNTRUL 

ELECTRONIC 

WEAPON CUNTRUL 

ELECTRUNIl 

WEAPUN USER 

WEAPON USER 

WEAPUN USER 

WEAPUN CUNTRUL 

NA V iOA TlUN 

NAVIGATION 

SUPPLY 

ENGINEER 

ENGINEER 

ENG 1 NEER 

ENGINEER 
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Page Ho. 1 

06/ 17/86 

SHIP ORGANIZATION DURING AIR ALERT 



DESCRIPTION NAME OF CREW MEMB. RANK 



COMMAND OFFICER 


Tally Chr 


is S 






NAVIGATOR 


Ertle Aar 


on P 






NAVIG. RADAR 


Wemgarte 


n Sam 




F 


HELMSMAN 


Nicholson 


George 


R 


HF BRIDGE COMM. 


Ramey Har 


old A 






UHF BRIDGE COMM 


Armout Pa 


ul G 






LEFT OBSERVER 


flarkley D 


amel 


T 




RIGHT OBSERVER 


bansiven 


Dan 


K 




CIC SUPERVISOR 


Concon St 


ephen 


J 




AIR RADAR 


Nezart Je 


rome 


G 




SURFACE RADAR 


Armstrong 


Dav i 


d 


K 


TRACK RADAR 


Quick Gim 


G 






CIC COMMUN ICAT. 


Lyon Arth 


ur B 






CENTR WEAP CONT 


Emerson B 


urt F 






GUN 31 CONSOLE 


Norton Ha 


rold 


G 




31 AMMO SUPPL1 


lilt Thom 


as C 






GUN 32 CONSOLE 


Russo Jam 


es D 






32 AMMO SUPPL1 


Qualls Te 


rry D 






GUN 33 CONSOLE 


I sol a Nik 


e L 






33 AMMO SUPPL1 


Pulk Rich 


ard G 






GUN 41 CONTROL 


Miller Jacj T 






GUN 42 CONTROL 


Little Freden 


k 


J 


A/A MISS CONTR 


Stee vens 


James 


F 




A/A MISSILES 1 


Fogel Gre 


gory 


B 




TELETYPE 1 


Newell Pe 


et S 






TELETYPE 2 


McPherson 


J ack 


A 




HF COMMUNICAT 


Mallon Pa 


trick 


F 




SURG ROOM SUPER 


Tngo Bum 


F 






SURG ROOM 1 


Tran Mike 


K 






ENG CONTR ROOM 


Jallee Ja 


y M 






MAIN ENGl ASS 1 


Gorman De 


nn is 


H 




MAIN ENGl ASS2 


Unger Jei 


1 H 






MAIN ENG2 ASSl 


Hobson Aa 


ron M 






MAIN ENG2 ASS2 


Russ Randy G 






ELECTR GENERAT 1 


Kett Davi 


d G 






ELECTR GENERAT2 


Getlme S 


cott 


B 




ELECTR GENERAT3 


Nikola Mi 


chael 


E 




DISTR TABLE 1 


Nezos Fred T 






DISTR TABLE 2 


Condon Ti 


m N 






DAMAGE CGNTROL1 


Ervin Joseph H 






DAMAGE C0NTR0L2 


Appel Joh 


n G 






DAMAGE CONTROLS 


Quinn Dan 


lel F 







LT. COMMANDER 

ENSIGN 

SEAMAN 

PO 1st CLASS 



PO 3rd CLASS 

SEAMAN 

SEAMAN 

SEAMAN 

LIEUTENANT 

CHIEF PO 

SENIOR CHIEF PO 

PO 3rd CLASS 

CHIEF PO 

1st LIEUTENANT 

PO 2nd CLASS 

SEAMAN 

SENIOR CHIEF PO 
SEAMAN 

PU 3rd CLASS 
SEAMAN 
SEAMAN 
SEAMAN 

PO 2nd CLASS 
SEAMAN 

MASTER CHI EF PU 

SEAMAN 

SEAMAN 

CHIEF PO 

SEAMAN 

LIEUTENANT 

PO 1st CLASS 

SEAMAN 

PO 3rd CLASS 
SEAMAN 



SEAMAN 




SEAMAN 




SEAMAN 




MASTER 


CHIEF 


PO 1st 


CLASS 


ENSIGN 




SENIOR 


CHIEF 


PO 3rd 


CLASS 



PU 

PO 



SPECIALTY 



DECK 

DECK 

RADAR UGEK 

NAVIGATION 

COMMUNICATION 

COMMUN ICA'l I UN 

NAViGA'l IUN 

NAVIGATION 

DECK 

RADAR Ubbri 
RADAR UGEK 
WEAPON CUN'I RUL 
SUPPLY 
DECK 

WEAPON USER 
WEAPUN USER 
WEAPUN USER 
WEAPON USER 
WEAPUN USER 
WEAPUN USER 
WEAPUN USEE 
WEAPUN USER 
WEAPUN CONTROL 
WEAPUN CUN (RUL 
CUMMUN1CA I 1 UN 
COMMUNICATION 
COMMUN ICA'l i UN 
SANITARY 
SaN i'l'AK Y 
ENGINEER 
ENGl NEER 
ENGINEER 
ENGINEER 
ENGl N EER 
ELECTRICIAN 
ELECTRICIAN 
ELECTRICIAN 
ELECTRICIAN 
ELECTRICIAN 
ENGINEER 
ENGINEER 
NAVIGATION 
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Page No. 2 

do/ 17/tifa 

SHIP ORGANIZATION DURING AIR ALERT 



DESCRIPTION NAME OF CREW MEMB. RANK 



KADlU ROOM SUP 

ESM 

ECM 

31 AflMO SUPPL2 

32 AnnO SUPPL2 

33 AMMO SUPPL2 
A/A MISS TELEPH 
A/A MISSILES 2 
EURO ROOM2 
SURG ROOMS 
DAMAGE C0NTR0L4 
DAMAGE CONTROLS 

damage controls 
damage control/ 
damage controls 



Jellerson Jack L 
Nelan James H 
Rugg Bill S 
Ibel Peter J 
F lammi Charles D 
Clark James D 
Clark Andrews I 
Biondi Daniel M 
Sestak Timothy W 
Shapiro Edwin W 
Trend Ted M 
William Robert P 
Beam Alan K 
Edson Alan B 
Cavalim Larry F 



ENSIGN 

MASTER CHIEF PO 

MASTER CHIEF PO 

PO 2nd CLASS 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 

SEAMAN 



SPECIALTY 



DECK 

WEAPON CONTROL 

ELECTRONIC 

ELECTRONIC 

WEAPON USER 

WEAPON CONTRGc 

WEAPON CONI kUL 

WEAPON CON I ROC 

NAVIGATION 

NAVIGATION 

SUPPLV 

ENGINEER 

ENG I N CER 

ENGINEER 

ENG 1 N EER 
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Page No. 1 

06/ 17/Bb 

SHIP ORGANIZATION DURING GENERAL ALERT 



DESCRIPTION NAME UK CREW MEN B . RANK SPECIAL!* 



COMMAND OFFICER 
NAVIGATOR 
NAVIG. RADAR 
HELMSMAN 
HF BRIDGE COMM. 
UHF BRIDGE COMM 
LEFT OBSERVER 
RIGHT OBSERVER 
CIC SUPERVISOR 
AIR RADAR 
SURFACE RADAR 
TRACK RADAR 
CIC COMMUNICAT. 
CENTR WEAP CONT 
GUN 31 CONSOLE 

31 AMMO SUPPL1 
GUN 33 CONSULE 

32 AMMO SUPPL1 
GUN 33 CONSOLE 

33 AMMO SUPPL1 
GUN 41 CONTROL 
GUN 42 CONTROL 
TORPEDO TUBE 1 
TORPEDO TUBE 2 
A/ A MISS CONTR 
A/A MISSILES 1 
SS MISSILES 1 
TELETYPE 1 
TELETYPE 2 

HF COMMUNICAT 
SURG ROOM SUPER 
SURG ROOM 1 
ENG CONTR ROOM 
MAIN ENG 1 ASS1 
MAIN ENG1 ASS2 
MAIN ENG2 ASS 1 
MAIN ENG2 ASS2 
ELECTR generati 
ELECTR GENERAT2 
ELECTR GENERAT3 
DISTR TABLE 1 
DISTR TABLE 2 



Tally Chris S 


LT. COMMANDER 




DECK 


Ertle Aaron P 


ENSIGN 






DECK 


Wemgarten Sam K 


SEAMAN 






RADAR USER 


Nicholson George R 


PO 1st 


CLASS 




NAVIGATION 


Ramey Harold A 


PO 3rd 


CLASS 




COMMUNICA I ION 


Armout Paul G 


SEAMAN 






COM MU N I L AT I UN 


narkley Daniel T 


SEAMAN 






NA V lGA'l ION 


Sansiven Dan K 


SEAMAN 






NAV IGA'I ION 


Concon Stephen J 


LIEUTENANT 




DECK 


Nezart Jerome G 


CHIEF 


PG 




RADAR USSR 


Armstrong David K 


SENIOR 


CHlEf- 


PU 


RADAR USER 


Quick Gim G 


HO 3rd 


CLA bb 




W E A PU N CUNT RUL 


Lyon Arthur B 


CHIEF 


PG 




SUPPLY 


Emerson Burt F 


1st LIEUTENANT 


DECK 


Norton Harold G 


PO 2nd 


CLASS 




WEAPON USER 


lilt Thomas C 


SEAMAN 






WEAPUN USER 


Russo James D 


SENIOR 


CHIEF 


PU 


WEAPUN USER 


Qualls Terry D 


SEAMAN 






WEAPON USER- 


isola Nike L 


PO 3rd 


C L A S b 




WEAPON USER 


Pulk Richard G 


SEAMAN 






WEAPUN USER 


Hiller Jacj T 


SEAMAN 






WEAPON USER 


Little Fredenk J 


SEAMAN 






WEAPON USER 


Fogel Gregory B 


seaman 






WEAPUN CONTROL 


Clark James D 


SEAMAN 






WEAPUN CUNIKUL 


Steevens James F 


PO 2nd 


CLAbb 




WEAPUN CuN'l RUL 


Clark Andrews I 


SEAMAN 






WEAPON CONY'kUL 


Biondi Daniel fl 


SEAMAN 






WEAPON LUNIRUL 


Newell Peet S 


MASTER 


CHIEF 


PG 


COMMUNICAT LUN 


McPherson Jack A 


SEAMAN 






COMMUNICATION 


hallon Patrick F 


SEAMAN 






COMMUNICATION 


Tngo Bum F 


CHIEF 


PG 




SANITARY 


Tran Mike K 


SEAMAN 






SAN 1 i AN Y 


Jaltee Jay M 


lieutenant 




ENGINEER 


Gorman Dennis H 


PO 1st 


CLASS 




ENGI NEeR 


Unger Jell H 


SEAMAN 






ENGINEER 


Hohson Aaron M 


PO 3rd 


CLASS 




engineer 


Russ Randy G 


SEAMAN 






ENG i N EER 


Kett David G 


SEAMAN 






ELECTRICIAN 


Getlme Scott B 


SEAMAN 






ELECTRICIAN 


Nikola Michael E 


SEAMAN 






ELECTRICIAN 


Nezos Fred T 


MASTER 


CHIEF 


PG 


ELECTRICIAN 


Condon Tim N 


PO 1st 


CLASS 




ELECTR 1C 1 AN 
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Page No. 2 

06/17/86 

SHIP URGANIZATIUN DURING GENERAL ALERT 



DESCRIPTION 


NAME OF CREW MEMB. 


RANK 




SPEGl AL 1 1 


DAMAGE CGNTRGL1 


Ervin Joseph H 


ENSIGN 






ENGINEER 


DAMAGE CONTROLS 


Appel John G 


SENIOR 


CHIEF 


PQ 


ENGINEER 


DAMAGE CONTROLS 


Quinn Daniel F 


PO 3rd 


CLASS 




NA v IbA 1 1UN 


RADIO ROOM SUP 


Jeiierson Jack L 


ENSIGN 






DEGK 


LSM 


Nelan James H 


M A 6 TER 


CHIEF 


HU 


WEAPUN LbN 


ECM 


ftugg Bill S 


MASTER 


CHIEF 


PU 


ELEC THUN 1C 


SI AMMO SUPPL2 


Ibel Peter J 


PO 2nd 


CLASS 




ELECT KUNiC 


J2 AMMO SUPPLZ 


Flamini Charles D 


SEAMAN 






WEAPUN USE! 


33 AMMU SUPPL2 


Sestak Timothy W 


SEAMAN 






NAVibA i LUN 


A/A MISS TELEPH 


Shapiro Edwin W 


SEAMAN 






NAV IGATlUN 


A/A MISSILES 2 


Trend Ted M 


SEAMAN 






SUPPLY 


SS MISS CONTR 


William Robert P 


SEAMAN 






ENGINEER 


SS MISS TELEPH 


Beam Alan K 


SEAMAN 






Engineer 


SS MISSILES 2 


Edeon Alan B 


SEAMAN 






ENGINEER 


SURG R00M2 


Cavalim Larry F 


SEAMAN 






ENG 1 N E E R 


SURG ROOMS 


Martyr Paul J 


seaman 






ENGINEER 


DAMAGE C0NTR0L4 


Knubis James P 


SEAMAN 






ENGINEER 


DAMAGE CONTROLS 


Kohn Robert H 


SEAMAN 






ENb J. NEER 


DAMAGE CONTROLS 


Sturgeon James K 


SEAMAN 






ENGINEER 


DAMAGE C0NTR0L7 


C 1 i n e William R 


SEAMAN 






ELECTRON it 


Damage controls 


Sorensen Donald M 


SEAMAN 






ELEC'i'KUN LL 



RUi_ 
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